Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  AW: Exception in Anwendung ohne Form

   
    by blablab, 20. Feb 2013
  Ich habs durch Zufall gefunden! 1:1 dieselbe Meldung die ich nach der Windows-Fehlermeldung bekomme, bekomme ich auch mit:
  program ExceptionTest;
  
  uses
  SysUtils,
  Windows;
  
  type
  EMyException = class(Exception);
• Forum: Sonstige Fragen zu Delphi

  AW: Exception in Anwendung ohne Form

   
    by blablab, 20. Feb 2013
  Danke!
  
  Scheinbar wird es von TApplication auch nicht anders geregelt:procedure TApplication.ShowException(E: Exception);
  var
  Msg: string;
  begin
  Msg := E.Message;
  if (Msg <> '') and (AnsiLastChar(Msg) > '.') then Msg := Msg + '.';
  MessageBox(PChar(Msg), PChar(GetTitle), MB_OK + MB_ICONSTOP);
  end;
• Forum: Sonstige Fragen zu Delphi

  AW: Exception in Anwendung ohne Form

   
    by blablab, 20. Feb 2013
  Gibt es da noch eine andere Möglichkeit? Normalerweise wird ja noch der Exception-Typ und die Adresse angegeben.
  
  Übrigens tritt der Windows-Fehler bei mir nur auf, wenn ich das Programm direkt ausführe, aus Delphi heraus funktioniert es. Ist das etwa nur bei mir der Fall??? (Benutze Delphi7 unter Win7 777)
• Forum: Sonstige Fragen zu Delphi

  Exception in Anwendung ohne Form

   
    by blablab, 20. Feb 2013
  Hallo!
  
  Ich hab ein kleines Programm ohne Forms. Das macht 100ms lang was und schließt sich dann wieder, fertig. Aber falls ein Fehler auftritt würde ich gerne eine Fehlermeldung anzeigen. Wenn ich aber eine Exception auslöse bekomme ich von Windows eine Fehlermeldung "Programm.exe funktioniert nicht mehr" und erst danach wird meine Fehlermeldung gezeigt.
  Aber wie kann ich eine eine Exception...