PureBoard

Code: Alles auswählen

; https://stackoverflow.com/questions/27962353/using-createfile-to-access-a-drive-partition
Handle = CreateFile_(@"\.\E:", #GENERIC_READ, #FILE_SHARE_WRITE | #FILE_SHARE_READ, 0, #OPEN_EXISTING, 0, 0)
If Handle = #INVALID_HANDLE_VALUE
  Debug "Laufwerk konnte nicht geöffnet werden!"
  End
EndIf

*Memory = AllocateMemory(50)
If *Memory = 0
  Debug "Speicher konnte nicht reserviert werden!"
  CloseHandle_(Handle)
  End
EndIf

Define BytesReaded
If 0 = ReadFile_(Handle, *Memory, MemorySize(*Memory), @BytesReaded, 0)
  Debug "Daten konnten nicht vom Laufwerk gelesen werden!"
  FreeMemory(*Memory)
  CloseHandle_(Handle)
  End
EndIf

Debug ShowMemoryViewer(*Memory, MemorySize(*Memory))

FreeMemory(*Memory)
CloseHandle_(Handle)