Exceptions behandeln... Ich glaun ich bin zu plöd....

[Kedariodakon]

Erst mal folgender Code:

Delphi-Quellcode:

...
procedure TForm1.TButton_ConnectClick(Sender: TObject);
  procedure Error(Error:EOleException);
  begin
      LException.Caption := 'EOleException';
      //LHelpFile.Caption := Error.HelpFile;
      //LSource.Caption := Error.Source;
      //LErrorCode.Caption := Error.ErrorCode;
      //LHelpContext.Caption := Error.HelpContext;
      //LMessage.Caption := Error.Message;
  end;
begin
  TButton_Connect.Enabled :=  False;
  TButton_Disconnect.Enabled := False;
  try
    SetConnectionString(TADOConnection_SQL);
    TADOConnection_SQL.Open;
  except
    on EOleException do ERROR(EOleException);
    TButton_Connect.Enabled :=  True;
    TButton_Disconnect.Enabled := False;
  end;
end;
...

Was soll das machen fragt sich bestimmt jeder

Es gibt ja ab und zu lustige Exceptions (da der Anwender zu plöd ist, oder der Programmierer zu plöd war), welche mit ner WindowsTypischen MessageBox quittiert werden

So ich bekomm das ja hin das keine Box erscheind, was ich ja net wirklich will

Wenn ich mir EOleException anschau, hat es Eigenschaften wie HelpFile, Source, ErrorCode, HelpContext und Message...

Wie komm ich an derren Inhalt ran, wenn solch eine Exception ausgelöst wird? So wie ich es gemacht hab scheinbar net, da kommt immer [Fehler] MainUnit.pas(95): Inkompatible Typen: 'EOleException' und 'Class reference'

Auch wenn ich die Eigenschaften im EceptBlock abfrag bekomm ich nur Fehler...

Hat da wer nen Tip? Irgendwas wie ich an die Werte rannkomm?
Dann wie sieht es mit meiner declarierten Procedure in der procedure aus? ist sowas verboten? funktionieren wird es wohl, meckert ja net rum ^^

MFG Keda