Abfrage FileExists(filename)

[Luckie]

Erstmal grausam, diese Labels. Delphi ist eine strukturierte Programmiersprache, die Blöcke kennt:

Delphi-Quellcode:

if FileExists(Filename) then
begin
  // Datei existiert, mach dies
end
else
begin
  // Datei existiert nut, mach das
end;

Daraus resultiert auch dein Fehler im Code: Wenn zu Marke eins gesprungen wird, wird auch der Code danach abgearbeitet, das heißt, egal, ob die Datei existiert oder nicht, im Label steht immer "File nicht gefunden".