Скачать: CL | DM;

Поле Data для каждого Strings[i] в StringList   Найти похожие ветки 

← →
SvetaZ ©   (2015-02-25 13:39) [0]

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

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 := ? - такого нет (

---

← →
MBo ©   (2015-02-25 13:49) [1]

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

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

---

← →
SvetaZ ©   (2015-02-25 14:15) [2]

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

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

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

---

← →
Palladin ©   (2015-02-25 14:18) [3]

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

---

← →
SvetaZ ©   (2015-02-25 14:26) [4]

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

Позволяет.


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

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

---

← →
Palladin ©   (2015-02-25 14:29) [5]

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

---

← →
junglecat ©   (2015-02-25 14:30) [6]

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

---

← →
SvetaZ ©   (2015-02-25 15:20) [7]

Спасибо.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c