Скачать: CL | DM;

Как увеличит TimeOut в AdoQuery   Найти похожие ветки 

← →
amamed_3071 ©   (2002-03-30 09:17) [0]

В проект прибавляеш модул ADODB.Pas.
В этом модуле находиш строку
Recordset.Open(Source, ActiveConnection,
CursorTypeValues[FCursorType], LockTypeValues[FLockType],
CommandTypeValues[CommandType] + ExecuteOptionsToOrd(ExecuteOptions));

перед этой стракой прибавляеш
SetCommandTimeout(900);

---

← →
DiggerAbstract   (2002-03-30 14:06) [1]

а можно проще - в программе перед открытием или после создания ADOQuery пишешь:
TADODataSet(DM.ADOQueryInsSums1AU).CommandTimeOut := 1000;
и фсё

---

← →
DiggerAbstract   (2002-03-30 14:06) [2]

а можно проще - в программе перед открытием или после создания ADOQuery пишешь:
TADODataSet(ADOQuery).CommandTimeOut := 1000;
и фсё

---

← →
DiggerAbstract   (2002-03-30 14:08) [3]

Sorry - сначало был пример из моей программы

---

← →
amamed_3071 ©   (2002-03-30 14:41) [4]

Лучше Один раз написат SetCommandTimeout(900);
чем 100 раз писать TADODataSet(ADOQuery).CommandTimeOut := 1000;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c