Weiss jemand, wie der Sourcecode von folgender Funktion aussehen könnte:
Der Kopf sollte etwa folgendermaßen aussehen:
Function Fileexists(Name:STRING):BOOLEAN;
Die funktion wird mit einem Dateinamen (String) als Parameter aufgerufen, und ermittelt dann, ob diese Datei existiert, dazu gibt sie entweder True oder False zurück. Vielen Dank im Voraus!
Andreas42 
(Anonym) „Funktion "Fileexists" in Pascal“
Hi!
Ich verwende dazu die Function FindFirst(), also eine der Funktionen zum durchsuchen des aktuellen Verezeichnisses. Die Umsetzung sieht dann etwa wie folgt aus (in Turbo/Borland-Pascal!):
function fileexist(name:string):boolean;
var s:searchrec;
begin
findfirst(name, anyfile, s);
if doserror=0 then fileexist:=true
else fileexist:=false;
end;
Ungetestet, die Fehlersuche überlasse ich dir. ;-)
Ach ja: FindFirst lässt Platzhalter ('*','?') zu und "findet" auch Verzeichnisse. Evtl. musst du dort noch etwas feintuning betreiben...
Ansonsten, kannst du natürlich auch einfach die Datei in name mit assign() und reset() zum Lesen öffnen. Die Variable ioresult liefert dann einen Wert 0 zurück, wenn ein Fehler aufgetreten ist. Die möglichen Fehler findest du in der Online-Hilfe des Compilers als Laufzeitfehler aufgeführt.
Bis denn
Andreas
