Ein Paar Exception-Fragen

[APP]

Hallo,

zu 1)
das ist einfach, Du must nur Deinen eigenen Exception-Handler basteln, am Besten im Hauptformular (er gilt applikationsweit):

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    procedure MyExceptionHandler(Sender: TObject; E: Exception);
  public
    { Public declarations }
  end;

....
procedure  // Zuweisung auf Deinen eigenen Handler
  TForm1.FormCreate(Sender: TObject);
begin
  Application.OnException := MyExceptionHandler;
end;

....
procedure TForm1.MyExceptionHandler(Sender: TObject; E: Exception);
var
  ErrFileName, ErrMsg: String;
  LOG_FILE: TextFile;
begin
  ErrFileName := ChangeFileExt(Application.ExeName, '.LOG');
    ErrMsg := Format('%s : %s - %s'#13#10, [DateTimeToStr(Now), E.ClassName, E.Message]);
    Memo1.Lines.Add(ErrMsg); // ups Memo, hätte ich fast vergessen!
    AssignFile(LOG_FILE, ErrFileName);   
    Append(LOG_FILE);
    Writeln(LOG_FILE, ErrMsg);
    Flush(LOG_FILE);                         // Sicherstellen, daß der Text tatsächlich in die Datei geschrieben wird.
    CloseFile(LOG_FILE);
  end;
  Application.ShowException(E);
end;

zu 2)
tut mir leid, aber ich verstehe nicht was Du genau willst.