[lmikle]

Код:

var
  L : TStringList;
  I, N : Integer;
begin
  L := TStringList.Create;
  L.LoadFromFile('myfile.txt');
  For I := 0 To (L.Count div 6) Do
    Begin
       label1.Caption := L[I*6];
       RadioButton1.Caption := L[I*6 + 1];
       RadioButton2.Caption := L[I*6 + 2];
       RadioButton3.Caption := L[I*6 + 3];
       RadioButton4.Caption := L[I*6 + 4];
       N := StrToInt(L[I*6 + 5]);
    End;
end;