Текущий архив: 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.013 c
