Wie kann ich die Volume-ID eines Laufwerks ermitteln?
Die Funktion "VolumeID" gibt die Volume-ID, also den Namen einer Partition zurück:
function VolumeID(DriveChar: Char): string; var OldErrorMode : Integer; NotUsed, VolFlags : DWORD; Buf : array [0..MAX_PATH] of Char; begin OldErrorMode := SetErrorMode(SEM_FAILCRITICALERRORS); try GetVolumeInformation(PChar(DriveChar + ':\'), Buf, sizeof(Buf), nil, NotUsed, VolFlags, nil, 0); Result := Format('[%s]',[Buf]); finally SetErrorMode(OldErrorMode); end; end;
Delphi 1 | Delphi 2 | Delphi 3 | Delphi 4 |
nicht getestet | Version nicht betroffen | getestet |
siehe auch:
Wie kann ich die ID-Nummer einer Audio-CD ermittlen?