DO - Der FoxPro-Kompatible Skriptinterpreter

isgraph

isgraph(Subject AS String?) AS Logical

Testet ob es sich bei dem ersten Zeichen einer Zeichenkette um ein sichtbares Zeichen handelt.

Zeige alle sichtbaren ASCII-Zeichen

  1
  2
  3
  4
  5
  6
  7
  8
  9

LOCAL ascii, cu, i
ascii = ""
FOR i = 0 TO 127
  cu = cpconvert("ascii", bintoc(i, "1S"))
  IF isgraph(cu)
    ascii = ascii + cu
  ENDIF
ENDFOR
? ascii

!"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~