[dr. F.I.N.]

Код:

procedure ...
var
  p: PLoadFiles;
begin
  p := PLoadFiles(L.Items[0]);
  Dispose(p);
  L.Delete(0);
end;

И я бы ограничил размерность строкового поля. Например, ShortString использовать (если достаточно 256 символов).