Other languages > GLBasic - de

Laufwerke

(1/5) > >>

Worebu:
Moinsen,

gibt es eine Möglichkeit  ALLE verfügbaren Laufwerke anzuzeigen?
Quasi wie bei Microsoft im Explorer.

Über ein Idee würde ich mich freuen .

D2O:
Servus,

in etwa so:

--- Code: GLBasic ---OCAL a% = 65 // Start mit dem Buchstaben 'A' in der ASCII Tabelle
LOCAL y% = 100
LOCAL out$[]
DIM out$[26]


        FOR i = 0 TO 25
       
                IF DOESDIREXIST(CHR$(a%)+":")
               
                out$[i] = "Laufwerk "+CHR$(a%)+": " + "ist vorhanden"
                ELSE
                out$[i] = "     Laufwerk "+CHR$(a%)+": " + "ist nicht vorhanden"
               
       
               
                ENDIF
               
                INC a%,1
        NEXT


WHILE TRUE

                FOR i = 0 TO 25
               
                        PRINT out$[i],100,y
                        y = y+10
               
                NEXT


                y = 100

        SHOWSCREEN
WEND

Worebu:
Jep, genau so . Danke.

Worebu:
Hi,

ich hab noch eine technische Frage


IF DOESDIREXIST(CHR$(a%)+":")                     diese Zeile funktioniert

IF DOESDIREXIST(CHR$(a%)+":\")                    diese nicht

Dir.gbas"(17) error : GPC0001 syntax error         das ist die Fehlermeldung (Zeile 17 ist die mit dem Befehl)


Hat jemand das schon mal gehabt?, was meint Ihr ,  liegt es am Schrägstrich?

D2O:
Hallo Worebu,

CHR$(92)  ist Dein Freund ;)

Das  Backslash  "\" wird auch für zusätze wie "\N" (Zeilenende) benutzt.
Daher muss man manche Zeichen mit CHR$() übergeben oder anzeigen lassen.

Schau mal in der GLB Hilfe unter "ASC()" nach, das sind die ASCII zeichen aufgeführt.

Navigation

[0] Message Index

[#] Next page

Go to full version