Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.08.21;
Скачать: CL | DM;

Вниз

работа с элементом списка   Найти похожие ветки 

 
werewolf2   (2011-05-10 13:35) [0]

нужно получить из списка объект по индексу, если равен nil, создать и вернуть созданный. делаю так:

такой вариант работы с элементом списка корректный, или можно записать подругому.


function TForm1.GetLinkerItemDecoder(Index: Int): TLinkerItemDecoder;
begin

 Assert((Index >= 0) and (Index <= FLinkerItems.Count));

 if FLinkerItems[Index] = nil then
   FLinkerItems[Index] := TLinkerItemDecoder.Create(
     FConveyerLinker.Links[Index]);
 Result := FLinkerItems[Index];

end;


 
clickmaker ©   (2011-05-10 13:41) [1]

я бы так написал

Result := FLinkerItems[Index];
if Result = nil then begin
 Result := TLinkerItemDecoder.Create(FConveyerLinker.Links[Index]);
 FLinkerItems[Index] := Result;
end;


 
Омлет ©   (2011-05-10 15:42) [2]

> Index <= FLinkerItems.Count

Может всё-таки "Index < FLinkerItems.Count"?


 
KSergey ©   (2011-05-10 16:30) [3]

Выходит, FConveyerLinker.Links[] всегда такого же размера, что и FLinkerItems должен быть. Причем это не проверяется в отличии от FLinkerItems (хотя бы через Assert).
Вообще, если 2 списка строго одинакового размера параллельно ведется - я бы постарался в один список запихать структуру. А то мало ли - размерчики разъедутся и привет.

Ну это если придираться.

А какого типа FLinkerItems? если это обычный TList какой-нибудь - то Assert не нужен: внутри при доступе к элементам всегда проверяется корректность индекса.



Страницы: 1 вся ветка

Текущий архив: 2011.08.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
15-1303911419
Scott Storch
2011-04-27 17:36
2011.08.21
Проектирование БД - использование нескольких категорий


15-1304242479
И. Павел
2011-05-01 13:34
2011.08.21
Как отловить информацию о запускаемых программах?


15-1304314820
erutan
2011-05-02 09:40
2011.08.21
ошибка при загрузке Delphi


2-1305114003
Max
2011-05-11 15:40
2011.08.21
все про Excel


2-1304704508
Alik
2011-05-06 21:55
2011.08.21
распаковка ZIP архива