Differenze tra le versioni di "Isprint()"
Da Gambas-it.org - Wikipedia.
Riga 6: | Riga 6: | ||
Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria di C: ''libc.so.6'', nella quale la funzione è contenuta: | Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria di C: ''libc.so.6'', nella quale la funzione è contenuta: | ||
Private <FONT color=#B22222>Extern isprint</font>(num As Integer) As Integer In "<FONT color=#B22222>libc:6</font>" | Private <FONT color=#B22222>Extern isprint</font>(num As Integer) As Integer In "<FONT color=#B22222>libc:6</font>" | ||
− | |||
Riga 18: | Riga 17: | ||
Dim i, n As Integer | Dim i, n As Integer | ||
− | + | For n = 0 To 255 | |
− | + | i = isprint(n) | |
− | + | Print n, CBool(i) | |
− | + | Next | |
'''End''' | '''End''' |
Versione delle 19:10, 11 mag 2023
La funzione della libreria di C
int isprint(int c)
ritorna 1 (Vero) se "c" e' il valore che rappresenta un carattere (compreso quello dello spazio) stampabile.
Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria di C: libc.so.6, nella quale la funzione è contenuta:
Private Extern isprint(num As Integer) As Integer In "libc:6"
Semplice esempio di uso in Gambas:
' int isprint(int c) ' Checks for any printable character including space. Private Extern isprint(num As Integer) As Integer In "libc:6" Public Sub Main() Dim i, n As Integer For n = 0 To 255 i = isprint(n) Print n, CBool(i) Next End