Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.03.2007, 09:55   #1
Гена
Новичок
Джуниор
 
Регистрация: 27.03.2007
Сообщений: 1
По умолчанию ADOQuery + поток

Коллеги!!! Прошу помощи в таком случае: пишу приложение в виде службы NT, в ней два потока, в одном - бесконечный цикл опроса COM-порта, во втором - результаты льются в базу данных с помощью ADOQuery и его поэтому создаю при старте потока таким кодом:
//=================================== ===============
CoInitializeEx (NIL, COINIT_MULTITHREADED);
ADOQuery1:= TADOQuery.Create(nil);
ADOQuery1.ConnectionString:= 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=wsus;Initial Catalog=Sovintel';
sql:= 'select count(*) from sovintel';
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(sql);
ADOQuery1.Open;
//=================================== ===============
Беда в том, что этот код не работает, ADOQuery1 не возвращает ничего. Я полагаю, что он просто не создается. Но раньше этот код точно работал, если его бросить на форму - также все работает. Ошибка, где-то в том, как правильно создавать ADOQuery1 в потоке. Огромная просьба помочь!!!!!
Гена вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
AdoQuery Stanislav БД в Delphi 34 26.06.2009 22:09
Поток Черничный Общие вопросы Delphi 5 27.09.2008 21:23
ADOQuery Только_Учусь Помощь студентам 2 16.07.2008 00:31
ADOQuery Roof БД в Delphi 2 12.07.2008 18:08
adoquery Toxa БД в Delphi 10 12.02.2007 20:07