Trata de buscar si existe alguna actualización de ADo para el delphi que estes utilizando, al menos para delphi 5 existen dos actualizaciónes de ADO...
en fin, trata lo siguiente a ver que te sale:
Código Delphi
[-]
with AdoQuery1 do begin
if active then close;
SQL.Clear;
SQL.Add(edit1.text);
Try
Open;
Except on E:Exception do
showmessage(E.ClassName+' - '+E.message);
end; end;
La recomendación sería que no utilizaras E:Exception, ya que de esa manera estarías capturando todos los errores y siempre obtendrías el mismo error... alguien alguna vez dijo "podría haber una guerra nuclear y seguiría obteniendo el mismo mensaje". Y en esa parte el E.ClassName te puede ayudar....