wie geht man richtig mit try..except um?

[Coffeecoder]

Delphi-Quellcode:

..
try
    DM_ADOQuery1.open;
  except
    on E: EOleException do
    begin
      ShowMessage( Format('%s: %s.', [E.ClassName, E.Message]));
    end;
  end;

Versuch mal "Exception" durch "EOleException" zu ersetzen.