Wer ist online?
Buchempfehlung
FreeBASIC-Chat
FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!fb:porticula NoPaste
GetLogicalDrives
| Uploader: |  hhr |
| Datum/Zeit: | 28.09.2019 09:26:19 |
' https://docs.microsoft.com/en-us/windows/win32/api/fileapi/nf-fileapi-getlogicaldrives
#Include "windows.bi"
Print "Vorhandene Laufwerke:"
Dim As Long i
For i=0 To 25
If Bit(GetLogicalDrives,i) Then
Print Chr(i+65);
End If
Next i
Print
Sleep
End
