EWriteError abfangen

[wb32]

hallo

folgende frage

Code:

try
  txt.Lines.SaveToFile(lw.Drive+':\myTemp\'+IntToStr(sc)+'.txt');
 except
  exit;
 end;

ich will mit der funktion auf eine diskette schreiben bis diese voll ist... ich habs auch schon mit on EwriteError do exit; probiert aber auch das geht nicht woran liegt das ?

[Luckie]

Ermittele mit DiskSize, wie viel noch draufgeht.

[wb32]

ich würde gern den fehler abfangen nich den freien space ermittel
kann man den fehler nich abfangen ?

[Luckie]

Und warum? Ich versteh dich nicht, das was du machst ist in etwa das: Ich fahre mit dem Auto über die Kreuzung und wenn es kracht war rot. Warum nicht voher auf die Ampel kucken, ob grün ist?

[Christian Seehase]

Moin wb,

vermutlich hast Du es aus der IDE heraus versucht.

Wenn hierbei im Menü unter

Tools\Debugger Optionen\Sprach-Exceptions

die CheckBox

Bei Delphi-Exceptions stoppen

markiert ist, bekommst Du die Exception trotzdem angezeigt.