![]() |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
Delphi-Quellcode:
??
RaiseLastOSError( );
Ich hoffe es wirft keine Meldung aus, diese möchte ich ja abfangen. |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
|
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Ok, soweit alles klar, aber was mache ich mit der
Zitat:
Ist das eine Konstante und wenn ja welchen Wert hat sie? |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
MfG Dalai |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
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; |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
|
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Moment, muss es nicht so sein? Ohne if-Abfrage?
Delphi-Quellcode:
function LaufwerkBeschreibbar(root: String): Boolean;
const FILE_READ_ONLY_VOLUME = $00080000; var Oem: Cardinal; MaximumComponentLength, FileSystemFlags: Cardinal; begin Oem := SetErrorMode(SEM_FAILCRITICALERRORS); GetVolumeInformation(PChar(Root), nil, 0, nil, MaximumComponentLength, FileSystemFlags, nil, 0); Result := ((FileSystemFlags and FILE_READ_ONLY_VOLUME) = FILE_READ_ONLY_VOLUME); SetErrorMode(Oem); end; |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
Aber dies ist noch lange kein Grund ständig diese nervigen modalen Exceptions zu werfen.:angel: Da glaube ich, werden wir uns nie einig werden.:cheers: |
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
|
AW: Wie Fehler bzw. Rückgabewert False abfangen?
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz