ZEOS: MySQL Fehler ausgeben lassen?

[Angel4585]

sowas?

Delphi-Quellcode:

try
  Query.ExecSQL;
except
  on e:Exception do
    ShowMessage(e.Message);
  end;