Differenze tra le versioni di "Visualizzare l'elenco di tutti gli elementi rilevanti del linguaggio Gambas contenuti dal codice del progetto"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Se si intende vedere l'elenco di tutti gli elementi rilevanti del linguaggio Gambas contenuti dal codice del progetto, è possibile dereferenziare opportunamente il ''Puntator...") |
|||
| Riga 27: | Riga 27: | ||
For i = 0 To 87 | For i = 0 To 87 | ||
| − | + | If Byte@(p2 + i) > 0 Then | |
| − | + | Print Chr(Byte@(p2 + i)); | |
| + | Else | ||
| + | Print | ||
| + | Endif | ||
| + | Next | ||
Next | Next | ||
'''End''' | '''End''' | ||
Versione delle 16:55, 28 giu 2018
Se si intende vedere l'elenco di tutti gli elementi rilevanti del linguaggio Gambas contenuti dal codice del progetto, è possibile dereferenziare opportunamente il Puntatore ottenuto dal Metodo "Object.Address( )", nel quale sia stato posto come suo argomento la parola-chiave "Me".
Gli elementi presenti nel codice possono essere anche dichiarati come "Privati".
Mostriamo un semplice esempio pratico:
Public Sub Main()
Dim p As Pointer
Dim s As String
p = Object.Address(Me)
s = "Testo qualsiasi."
Functio(p)
End
Private Function Functio(po As Pointer)
Dim i As Integer
Dim p1, p2 As Pointer
p1 = Pointer@(po + SizeOf(gb.Pointer) * 5)
p2 = Pointer@(p1)
For i = 0 To 87
If Byte@(p2 + i) > 0 Then
Print Chr(Byte@(p2 + i));
Else
Print
Endif
Next
Next
End
