[pascalpwnz]

Сообщение от TAMBIK

а проще просто брать из массива
запись 1
запись 2
и т.д как это сделать?

эээм... бртаь из массива ? ну

begin

 for i:=1 to 100 do
  begin
   if mas[i]=... then  // i - номер записи
    ...   
  end;

end.