procedure TIBSQL.SQLChanging(Sender: TObject);
begin
 if Assigned(OnSQLChanging) then
   OnSQLChanging(Self);
 if FHandle <> nil then FreeHandle;
end;

:-)
Да, действительно...

With b/r.Gleb.

Ответить