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

Вниз

нужна помощь   Найти похожие ветки 

← →
dim- ©   (2002-09-05 20:22) [0]

Есть ListView, есть структура:
type work=record
time:tdatetime;
path:string[250];
arhv:string[20];
fil:boolean;
avDat:boolean;
end;
Works:Work;
как поместить ссылку в ListView.items.Data на Works и получить структуру назад

---

← →
Kopetr ©   (2002-09-05 20:33) [1]

См. в хелпе TList -> example.

---

← →
Юрий Федоров ©   (2002-09-05 20:45) [2]

type
PWork = ^Work
...
var Works : PWork
...
getMem(WOrks, SizeOF(Work))
..
ListVIew.Items[0].Data:=Works;

...

Works:=ListVIew.Items[0];
Work^.time:=now;
....
//Не забыть освободить память

PS. Названия типов принято начинать с T

---

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

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

Наверх

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