TADODataSet.Next. Почему так медленно?

← →
Bless © (2006-08-15 12:54) [0]

Сабж собственно.
Есть два фрагмента
procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin i:=0; with q.Recordset do begin MoveFirst; while not EOF do begin MoveNext; inc(i); end; end; showMessage(IntToStr(i)); end;
и

procedure TForm1.Button2Click(Sender: TObject); var i:integer; begin i:=0; q.First; while not q.Eof do begin q.Next; inc(i); end; showMessage(IntToStr(i)); end;

q - TADODataSet - простой селекс из одной таблицы с
почти 30000 тыс. записей.
DB-Aware контролов на форме нет.

Время в тиках секунд не засекал.
Но пока выполнялся первый - я досчитал до одного,
пока второй - до двадцати четырех.
Почему такая огромная разница?
Ее можно сократить?

← →
sniknik © (2006-08-15 13:17) [1]

> DB-Aware контролов на форме нет.
неважно, DisableControls все одно сделай.

← →
ORMADA © (2006-08-15 13:20) [2]

индексы ещё прикрути..
может быстрее будет
да и тащить 30,000 записей на клиента ни к чему! всё равно никто стока сразу не просмотрит! а на сервере обработка 30,000 (даже с тормозными курсорами)- игрушки.

← →
sniknik © (2006-08-15 13:24) [3]

индексы не причем, это же в памяти рекордсет на клиенте (я его могу и не с бабы получать а например с файла, или по ходу программы его сделать/заполнить...)

← →
Ega23 © (2006-08-15 13:24) [4]

> sniknik © (15.08.06 13:24) [3]

Хорошая у тебя опечатка... :о)

← →
sniknik © (2006-08-15 13:27) [5]

> Хорошая у тебя опечатка... :о)
;о))))))) да, оттуда я еще данных не получал.... :)

← →
Bless © (2006-08-15 13:56) [6]

> sniknik © (15.08.06 13:17) [1]
>
> > DB-Aware контролов на форме нет.
> неважно, DisableControls все одно сделай.

С "посчитал до двадцати четырех" сократилось до "посчитал до двух".
Блин, я знал конечно, что DisableControls - это полезно, но не думал, что аж настолько!

> Блин, я знал конечно, что DisableControls - это полезно,
> но не думал, что аж настолько!
>

А ты его реализацию смотрел?

А посмотри. Много интересного узнаешь.

TADODataSet.Next. Почему так медленно? Найти похожие ветки