TControlListItem = record
  Control: TControl;
  Parent: TWinControl;
end;

struct TControlListItem {
  TControl * Control;
  TWinControl * Parent;
};