Baza na SQL

0

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

0
try
  //...
except
  on {...} do {...};
  on {...} do {...};
  else {...};
end;

Przy uruchamianiu z debugerem zawsze będzie pokazywało błąd (okienko) jeżeli nastąpi wyjątek. Normalnie w środowisku Windows zrobi to co jest po except.

1 użytkowników online, w tym zalogowanych: 0, gości: 1