Hallo Matze,
danke für deine Antwort!
Bin immer noch am Suchen...
Deinen Rat das Projekt neu zu erzeugen hatte ich zuvor schon mal getan.
Ich habe auch keine Fehler unterdrückt durch Compilerschalter wenn du das meinst.
Andere Fehlermeldungen erscheinen, nur diese EFOpenError-Meldung nicht...
Habe zwischenzeitlich von Embar..Dingens folgendes gefunden und probiert, funktioniert aber auch nicht:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnException := AppException;
end;
procedure TForm1.AppException(Sender: TObject; E:
Exception);
begin
Application.ShowException(E);
Application.Terminate;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
raise EPasswordInvalid.Create('
Incorrect password entered');
end;
Ratlose Grüße.
//roter Kasten
@ s.h.a.r.k
ich lass in einer Schleife mehrere Dateien umbenennen und möchte dem Anwender auch jeweils eine Rückmeldung geben, welche Datei(en) nicht umbenant werden konnten.
Jetzt erst festgestellt, da ich das zuvor ausgeschlossen hatte:
RenameFile gibt mir True zurück!
Warum das denn?
// 2. roter Kasten (bin ich heute langsam)
@ himitsu,
SetLastError schau ich mir gleich mal an!