![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему возникают тормоза при переходе от массива к такой схеме ? [D7]
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
код приведите.