Piszę bazę danych na SQL. I mam tam okienko do wpisania zapytań SQL. I to działa, tylko że program wysypuje się jeśli wpiszę błędne zapytanie. Jak się przed tym zabezpieczyć, żeby się nie wysypał tylko zgłosił komunikat o błędzie ?
Znalazłem takie coś, ale to nie działa. Ale może komuś to pomoże znaleźć lepsze rozwiązanie.
if Key=#13 then
begin
With ZMySqlQuery1 Do
begin
Close;
Try
ZMySqlQuery1.Sql:=Memo1.Lines;
Except
On EDBEngineError Do
ShowMessage('Bledna skladnia zapytania SQL.');
On EDatabaseError Do
ShowMessage('Bledny parametr lub zapytanie.')
end
end
end;
P.S. Korzystam z komponentów ZEOS