Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Здраствуйте!!! Что лучше, старичок BDE или универсал ADO для Серв [D3, D4, D5, D6, MSSQL, MySQL]

bardi © (2002-05-16 17:15:00)
Здраствуйте!!! Что лучше, старичок BDE или универсал ADO для Сервака MS SQL.
Провел небольшой тест, и очень удивился, что BDE работает в 5-5,5 раза быстрее. Неужели за универсальный ADO надо платить скоростью, но не во столько раз.Кинул на форму Database1, Query1, подключил через BDE, и ADOConnection1, ADOQuery1. Создал цикл до 5000 раз ,машина P3-600/64M/ ось NT BDE-34c. ADO-3м07с
цикл до 10000раз, машина Сeler-1000/256M/ осьW200 BDE-17c. ADO-1м27с

//пример
procedure TForm1.Button1Click(Sender: TObject);
var i:integer; TimeX :TTime;
begin
TimeX := now;
Query1.DisableControls;
for i := 1 to 5000 do
begin
Query1.Close;
Query1.Open;
end;//for
Query1.EnableControls;
Label1.Caption:= TimeToStr(now-TimeX);
end;

procedure TForm1.Button2Click(Sender: TObject);

var i:integer; TimeX :TTime;
begin
TimeX := now;
ADOQuery1.DisableControls;
for i := 1 to 5000 do
begin
ADOQuery1.Close;
ADOQuery1.Open;
end;//for
ADOQuery1.EnableControls;
Label1.Caption:= TimeToStr(now-TimeX);
end;

Lusha (2002-05-16 17:23:00) [1]
ADO конечно медленнее, но не до такой степени, конечно. Скорее всего у Вас ADOQuery тащит все записи удовлетворяющие запросу на клиента. По-моему это где-то настраивается... :)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »