[Ultras]

так ему TList надо, я когда то record загружал в TList через указатель на тот самый record:

Код:

type
TPluginInfo = record
  InitInfo: string;
  Handle: integer;
end;

PPluginInfo = ^TPluginInfo;

var
  list: TList;
  PluginInfo,test1: PPluginInfo;
begin
  list := TList.Create;
  New(PluginInfo);
  PluginInfo.InitInfo := 'test';
  PluginInfo.Handle := 123;
  list.Add(PluginInfo);

//  list.Count; // - получить кол-во добавленных элементов
  test1 := List[0]; // - получить 1ый элемент
  ShowMessage(test1.InitInfo); //обращение к первому элементу из списка
end;

как-то так ))