sql-befehl auf erfolg prüfen

[Orbmu2k]

Delphi-Quellcode:

DM_FP.ADOCommand1.CommandText :=sql;
try
  DM_FP.ADOCommand1.Execute;
  messagedlg('Alles Super', mtInfo, [mbok], 0);
except
  on E:Exception do
      messagedlg(E.Message, mtError, [mbok], 0);
end;