Форум: "Базы";
Текущий архив: 2002.10.31;
Скачать: [xml.tar.bz2];
ВнизDelphi+ADO Найти похожие ветки
← →
Саша К. (2002-10-12 04:59) [0]Подскажите как реализовать запрос к базе данных в процедуре, используя локальную переменную TADOQuery?
Иными словами нужно что-то вроде этого:
procedure SomeProcedure();
var
ADOQuery1 : TADOQuery;
begin
with ADOQuery1 do
begin
Connection := Con;
with SQL do begin
Clear;
Add("SELECT * FROM SomeTable");
end;
Open;
end;
end;
При запуске программы и выполнении этой процедуры вылетает эксепшн при первом обращении к объекту ADOQuery1. Тоже самое происходит при использовании TADODataSet вместо TADOQuery.
P.S.: Con в тексте программы - это глобальная переменная типа TADOConnection (с ней все нормально).
← →
sniknik (2002-10-12 09:06) [1]добавь
ADOQuery1:= TADOQuery.Create(Self);
with ADOQuery1 do
....
ADOQuery1.Free;
можно и так, без обьявления переменной
with TADOQuery.Create(Self) do
begin
....
Free;
end;
← →
AngeL B. (2002-10-12 23:22) [2]Все таки еще более правильно
with TADOQuery.Create do
try
...
finally
Free;
end;
← →
Саша К. (2002-10-12 23:35) [3]О! Спасибо вам. Я уж и не надеялся. :)
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.10.31;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c