Okay, geht wohl nur wenn ich die Function aus der kernel32 importiere:
Delphi-Quellcode:
function FindFirstVolume(lpszVolumeName: PChar; cchBufferLength: DWord): THandle; stdcall; external 'kernel32.dll' name 'FindFirstVolumeA';
function FindNextVolume(hFindVolume: THandle; lpszVolumeName: LPTSTR; cchBufferLength: DWORD): BOOL; stdcall; external 'kernel32.dll' name 'FindNextVolumeA';
function FindVolumeClose(hFindVolume: THandle): BOOL; stdcall; external 'kernel32.dll' name 'FindVolumeClose';
Allerdings meckert mir jetzt Delphi die erste Zeile gleiche an:
Code:
Erwartet: ':', aber ein String-Literal "kernel32.dll" erhalten in Zeile 42
Aber Schreibweise ist laut Delphi-Hilfe so korrekt. Was mache ich hier falsch?