Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Почему возникают тормоза при переходе от массива к такой схеме ? [D7]


Страницы:   1 2

AIms ©   (2005-08-24 01:36:00) 

Было:
AIms : array of TAIms;

Cтало :

FAIms : array of TAIms;

property AIms[Index: Integer]: TAIms read GetObject write SetObject;

Всё нормально работает, но тормозит жутко, не понимаю почему. Это чего, просто такая тормозная конструкция, или что-то ещё ? И главное, можно ли это как нибудь ускорить ?


AIms   (2005-08-24 02:02:00) [21]

Там ничего нету. Только загрузка при первом обращении :

Вроде так :

function  TAi2.GetObject(Index: Integer): TAIms;
begin
 if not isLoad then begin
   isLoad := True;
   LoadIt;
 end;
 Result := FAIms[Index];
end;

procedure TAi2.SetObject(Index: Integer; Value: TAIms);
begin
 FAIms[Index] := Value;
end;


Defunct   (2005-08-24 01:47:00) [22]

причина возможно здесь:

GetObject/SetObject

код приведите.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо