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>" | ||
| − | |||
| − | |||
Semplice esempio di uso in Gambas: | Semplice esempio di uso in Gambas: | ||
<FONT color=Gray>' ''int isprint(int c)'' | <FONT color=Gray>' ''int isprint(int c)'' | ||
| Riga 13: | Riga 11: | ||
Private Extern <FONT color=#B22222>isprint</font>(num As Integer) As Integer In "<FONT color=#B22222>libc:6</font>" | Private Extern <FONT color=#B22222>isprint</font>(num As Integer) As Integer In "<FONT color=#B22222>libc:6</font>" | ||
| − | + | ||
| + | Public Sub Main() | ||
Dim i, n As Integer | Dim i, n As Integer | ||
| Riga 21: | Riga 20: | ||
Print n, CBool(i) | Print n, CBool(i) | ||
Next | Next | ||
| − | + | ||
| − | + | End | |
Versione attuale delle 15:39, 15 giu 2024
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
