Differenze tra le versioni di "Isprint()"
Da Gambas-it.org - Wikipedia.
| Riga 12: | Riga 12: | ||
<FONT color=Gray>' ''int isprint(int c)'' | <FONT color=Gray>' ''int isprint(int c)'' | ||
' ''Checks for any printable character including space.''</font> | ' ''Checks for any printable character including space.''</font> | ||
| − | + | Private Extern <FONT color=#B22222>isprint</font>(num As Integer) As Integer In "<FONT color=#B22222>libc:6</font>" | |
'''Public''' Sub Main() | '''Public''' Sub Main() | ||
| − | Dim i As Integer | + | Dim i, n As Integer |
| − | i = isprint( | + | For n = 0 To 255 |
| − | + | i = isprint(n) | |
| − | + | Print n, CBool(i) | |
| + | Next | ||
'''End''' | '''End''' | ||
Versione delle 09:07, 29 dic 2015
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
