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

Вниз

TStringList вложенный в TStringList   Найти похожие ветки 

 
GGWIN ©   (2002-09-10 18:41) [0]

Вопрос конечно ламерский, но чес слово что-то клинит меня.
В TStringList есть Items и Objects мне нужно для каждого Итема забацать свой Объект типа TStringList.
Ну в общем это и есть вопрос - КАК это сделать?
Если можно буду рад краткому примеру.


 
Song ©   (2002-09-10 18:44) [1]

Создать все эти объекты, а потом прописать их указатели в TStringList.Object


 
pasha_golub ©   (2002-09-10 19:02) [2]


var SL,SL_N: TStringList;
i: integer;
begin
SL := TStingList.Create;
for i:= 0 to <кол-во строк>-1 do
begin
SL_N := TStringList.Create;
SL.Append("String"+inttostr(i));
SL.Objects[i] := SL_N;
end;
end;


Соответственно все это потом надо будет освободить в цикле.


 
GGWIN ©   (2002-09-10 19:21) [3]

Все гениальное блин просто!
Че я тупил ???....

Как говорится Вери Сенькс. :)))


 
Вконец озверевший кадастрат   (2002-09-10 19:22) [4]

Добавлю, что доступ к этому делу делаем так:
TStringsList(SL.Objects[i])
Or
SL.Objects[i] as TStringList

напр:
TStringsList(SL.Objects[i]).Items......



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
1-73676
GGWIN
2002-09-10 18:41
2002.09.23
TStringList вложенный в TStringList


3-73539
gera-killer
2002-09-02 15:02
2002.09.23
Delphi + Btrieve?


1-73663
AL2002
2002-09-12 21:17
2002.09.23
Как удостовериться, что шрифт не установлен,


14-73820
Igorek
2002-07-30 18:37
2002.09.23
Хочу нового языка программирования. Кто еще?


1-73655
Martin
2002-09-12 17:50
2002.09.23
Как поместить НЕ ГЛАВНЫЕ окна программы в панель задач?