Da wurde schon drauf eingegangen.
Ich persönlich würde aber diese Variante bevorzugen und nur die Message ergänzen und die Anzeige der
Exception der App überlassen oder zumindest nur einmal Showmessage aufrufen.
Delphi-Quellcode:
try
qry2.Open;
except
on E:
Exception do
begin
E.
Message := E.
Message + #13 + qry2.SQL.Text;
raise;
end;
end;