Daten auf Diskette speichern?

[City Light]

ich habe folgendes Problem ,wenn ich meine Daten auf Diskette schreiben(Speichere) kommt vollgende fehler meldung "EWritError" grund dafür ist das die Disk voll ist!. Nun wie kann ich dieses umgehen oder den Fehler abfangen und den Anwender darauf auf merksam machen

PS: zum speichern verwende ich das Savedialog falls es euch helfen sollte.

für jede weitere hilfe wer ich dankbar

Gruß Tino

[Stanlay Hanks]

SaveDialog gibt ja nur den Dateipfad zum Speichern an... Du müsstest vorher überprfüen, wieviel platz auf der Disk is

[City Light]

aha und wie könnte ich sowas an stellen?

[r_kerber]

Am Besten vorher mit DiskFree den noch verfügbaren Speicherplatz abfragen!

[City Light]

aber wo her weis ich welches Laufwerk der User bei Savedialog gewählt hat?

[r_kerber]

ExtractFileDrive

[City Light]

Danke euch ,werd mir das mal in der Delphi Hilfe näher anschauen....wenn ich noch fragen haben sollte meld ich mich wieder!

Gruß Tino

[r_kerber]

Genau da habe ich es raus!

[Luckie]

Delphi-Quellcode:

{I-}  // Lese-, Schreibfehlerbehandlung vom Betriebssytem ausschalten
  ...;  // Lesen, schreiben oder ähnliches
  if IOResult <> 0 then  //  Fehler ist aufgetreten
    RaiselastOSError();  //  Fehlermeldung vom Betriebssystem ausgeben
{$I+}  //  Lese-, Schreibfehlerbehandlung vom Betriebssytem wieder einschalten

[S - tefano]

Weiß nicht mehr seit welcher Delphi- Version es das gibt, aber unter "additional/zusätzlich" gibts ne Komponente, die ApplicationEvents heißt.
In deren Event "OnException" wird dir in der Variable "e" der Fehlertext zurückgegeben.
Den kannst du dann auswerten und eine entsprechende Meldung ausgeben, die Standard- Fehlermeldung erscheint dann nicht mehr.