Differenze tra le versioni di "Isprint()"
Da Gambas-it.org - Wikipedia.
(2 versioni intermedie di uno stesso utente non sono mostrate) | |||
Riga 1: | Riga 1: | ||
La funzione della libreria di C | 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. | ritorna 1 (Vero) se "c" e' il valore che rappresenta un carattere (compreso quello dello ''spazio'') stampabile. | ||
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 14: | 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 | ||
− | + | For n = 0 To 255 | |
− | + | i = isprint(n) | |
− | + | Print n, CBool(i) | |
− | + | Next | |
− | + | ||
− | + | End |
Versione attuale delle 14: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