Hilfe ich weiß net weiter, meine IF-Formel funktioniert net

[chaotic91]

Hi,

villeicht kann mir jemand helfen. Ich versuch ne IF-Formel zu schreiben, die feststellt ob eine Datei schon existitiert oder net, egal wat ich mache ich bekomme immer ne Ungültige Typumwandlung.

Wäre cool wenn mir da jemand helfen könnte.

hier is noch en Ausschnitt von meinem Programm


if file ('SAP.txt') not exist then begin
AssignFile(SAP_D, 'SAP.txt');
Rewrite(SAP_D);
write(SAP_D, SAP);
CloseFile(SAP_D);
end

else begin
AssignFile(SAP_D, 'SAP.txt');
Reset(SAP_D);
write(SAP_D, SAP);
CloseFile(SAP_D);
end;

Wäre euch echt dankbar wenn mir damit jemand helfen könnte

[Markus Kinzler]

if not FileExists ('SAP.txt')

[chaotic91]

jo danke dat funktioniert, ohne Hilfe wär ich nie weiter gekommen

[Bernhard Geyer]

Und bitte mit kompletten Pfad angeben. Ansonsten ist es zufall ob das aktuelle Verzeichnis der Anwendung passend ist damit die Datei gefunden wird

(z.B. FileExists(ExtractFilePath(Application.Exename) + '\SAP.txt') ...)

[chaotic91]

Danke Bernhard

werd ich machen, nochmals danke