Wie Fehler bzw. Rückgabewert False abfangen?

[AlexII]

Ich glaube ich hab's. Vielen Dank an alle!

Delphi-Quellcode:

function LaufwerkBeschreibbar(root: String): Boolean;
const
  FILE_READ_ONLY_VOLUME = $00080000;
var
  Oem: Cardinal;
  MaximumComponentLength, FileSystemFlags: Cardinal;
begin
  Oem := SetErrorMode(SEM_FAILCRITICALERRORS);
  if GetVolumeInformation(PChar(Root), nil, 0, nil, MaximumComponentLength, FileSystemFlags, nil, 0) then
    Result := ((FileSystemFlags and FILE_READ_ONLY_VOLUME) = FILE_READ_ONLY_VOLUME);
  SetErrorMode(Oem);
end;