Медленно работает CDS

← →
Juice © (2006-09-15 15:45) [0]

В CDS загружаются данные из другого CDS и затем я оперирую этими данными в нем - передвигаюсь и редактирую то что надо изменить. Все это происходит в памяти и в базу попасть не должно. Проблема в том что при маленьких обьемах данных (100 записей например) очень большие задержки при вызове Post - около 0.5-1 сек . Например мне нужно пробежаться по ста записям и в поле где 1 поставить 0, и это занимает около 70 секунд! Что подскажите, что можно отключить, как повлиять, может кто-то сталкивался с таким?

← →
Desdechado © (2006-09-15 15:57) [1]

> В CDS загружаются данные из другого CDS
Механизм?

← →
Shaman_ © (2006-09-15 16:15) [2]

Нужна более детальная картина. Здесь проблема не в скорости CDS, а в чем то другом

← →
Juice © (2006-09-15 16:52) [3]

> Механизм?

Data := Data

← →
Shaman_ © (2006-09-15 17:24) [4]

Какой результат выдаст этот код?

procedure SpeedCalc; var TestCDS: TClientDataSet; i: Integer; StartDateTime,FinallyDateTime: TDateTime; begin try TestCDS := TClientDataSet.Create(nil); TestCDS.FieldDefs.Add("Field1",ftInteger); TestCDS.CreateDataSet; StartDateTime := Date+Time; for i := 0 to 100 do begin TestCDS.Insert; TestCDS.FieldByname("Field1").AsInteger := i; TestCDS.Post; end; TestCDS.First; while not TestCDS.Eof do begin TestCDS.Edit; TestCDS.FieldByName("Field1").AsInteger := 100; TestCDS.Post; TestCDS.Next; end; FinallyDateTime := Date+Time; ShowMessage("Время старта: "+DateTimeToStr(StartDateTime)+#10+"Конечное время: "+DateTimeToStr(FinallyDateTime)); finally FreeAndNil(TestCDS); end; end;

← →
Fay © (2006-09-16 04:52) [5]

2 Shaman_ © (15.09.06 17:24) [4]
Нелепый код

2 Shaman_ © (15.09.06 17:24) [4]

Такой же нелепый как изложеная автором проблема. У автора метод Post в маленьких наборах данных CDS выполняется 0,5-1 секунд
Этот код собственно и есть маленький набор данных с методом Post на insert и edit

> Shaman_ © (16.09.06 12:30) [6]
> 2 Shaman_ © (15.09.06 17:24) [4]
>
> Такой же нелепый как изложеная автором проблема.

Спасибо за помощь, но насчет нелопости ты тут погарячился. Отключение ChangeLog решило проблему. А так, навскидку TestCDS := TClientDataSet.Create(nil); надо бы перед try.

>ChangeLog решило проблему
Вообще кэширование изменений не должно так сильно влиять на производительность. Может такое проявляется если записи очень "Тяжелые"...? Допустим большие записи в Blob полях

Медленно работает CDS Найти похожие ветки