![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как увеличит TimeOut в AdoQuery [D5, D6, MSSQL]
amamed_3071 © (2002-03-30 09:17:00)В проект прибавляеш модул ADODB.Pas.
В этом модуле находиш строку
Recordset.Open(Source, ActiveConnection,
CursorTypeValues[FCursorType], LockTypeValues[FLockType],
CommandTypeValues[CommandType] + ExecuteOptionsToOrd(ExecuteOptions));
перед этой стракой прибавляеш
SetCommandTimeout(900);
amamed_3071 (2002-03-30 14:41:00) [1]Лучше Один раз написат SetCommandTimeout(900);
чем 100 раз писать TADODataSet(ADOQuery).CommandTimeOut := 1000;
DiggerAbstract (2002-03-30 14:08:00) [2]Sorry - сначало был пример из моей программы
DiggerAbstract (2002-03-30 14:06:00) [3]а можно проще - в программе перед открытием или после создания ADOQuery пишешь:
TADODataSet(DM.ADOQueryInsSums1AU).CommandTimeOut := 1000;
и фсё
DiggerAbstract (2002-03-30 14:06:00) [4]а можно проще - в программе перед открытием или после создания ADOQuery пишешь:
TADODataSet(ADOQuery).CommandTimeOut := 1000;
и фсё