Форум: "Базы";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];

Вниз

Как увеличит 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 вся ветка

Форум: "Базы";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c