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

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

Поле Data для каждого Strings[i] в StringList [D7]

SvetaZ ©   (2015-02-25 13:39:00) 

Есть примерно такая структура данных:

var
 SL: TStringList;
 PStr: array of Pointer;
 i,j: Integer;
................................
 for i := 0 to 1000 do
 begin
   SL := TStringList.Create;
   for j := 0 to 20 do
     SL.Add('Тест'+IntToStr(j));

   PStr[i] := Pointer(SL);
 end;


Как для каждого Strings можно назначить соответсвующие целочисленное поля?

Strings[i].Data := ? - такого нет (

---

SvetaZ   (2015-02-25 15:20:00) [1]

Спасибо.

---

junglecat   (2015-02-25 14:30:00) [2]

есть еще вариант .Objects[i] := TObject(SomeIntVal)

---

Palladin   (2015-02-25 14:29:00) [3]

TObject кастуется к Integer и наоборот

---

SvetaZ   (2015-02-25 14:26:00) [4]

> Palladin ©   (25.02.15 14:18) [3]

Позволяет.


> MBo ©   (25.02.15 13:49) [1]
>
> Стоит посматривать в хелп.
> Есть Objects.

Т.е. вариант один: создать класс от TObject c одним полем типа Integer?

---

Palladin   (2015-02-25 14:18:00) [5]

а сразу
PStr: array of TStringList
религия не позволяет объявить?

---

SvetaZ   (2015-02-25 14:15:00) [6]

> MBo ©   (25.02.15 13:49) [1]

Ну а что здесь не так?

ShowMessage(TStringList(PStr[100]).Strings[10]);

---

MBo   (2015-02-25 13:49:00) [7]

Стоит посматривать в хелп.
Есть Objects.

>PStr[i] := Pointer(SL);
Для чего это?

---

Наверх