folgendes wäre eine möglichkeit
Delphi-Quellcode:
P2Buttons = ^T2Buttons;
T2Buttons = record
Btn1: TButton;
Btn2: TButton;
end;
[...]
L2Buttons: P2Buttons;
begin
new(L2Buttons);
Item.data := L2Buttons;
[...]
natürlich darfst du in dem fall dann nicht vergessen mit dispose den pointer auf den Record freizugeben wenn du das Item löschst.