Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
40.088 Beiträge
 
Delphi 11 Alexandria
 
#11

AW: Schreibschutz eines Wechselmediums auslesen

  Alt 19. Sep 2014, 19:53
Dein Compiler gibt nicht zufällig eine Warnung aus?
So vonwegen Result sei nicht initialisiert.

Delphi-Quellcode:
if GetVolumeInformation(...) then
  Result := Drive_Flags and FILE_READ_ONLY_VOLUME <> 0
else
  Result := False; // <<<<<<

// oder

Result := GetVolumeInformation(...) and (Drive_Flags and FILE_READ_ONLY_VOLUME <> 0);
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat