wczytywanie wartosci z tablicy do listview

0

mam taki rekord:
TDataRec = packed record
Tytul : String[150] ;
Wykonawca : String[150] ;
Rodzaj : String[65] ;
Opis : String[250] ;
end;

przypisuje go tablicy:

var
Tablica : array [1..50] of TDataRec;

i teraz chcialbym wczytac dane z tablicy do TListView. tylko jak?

0
type
    TDataRec = packed record
    Tytul       :   String[150] ;
    Wykonawca   :   String[150] ;
    Rodzaj      :   String[65]  ;
    Opis        :   String[250] ;
  end;
var
    Tablica       :   array [1..50] of TDataRec;
    Item: TListItem;
    i: integer;
begin
  for i := 1 to 50 do
  begin  
    Item := ListView1.Items.Add;
    Item.Caption := Tablica[i].Tytul;
    Item.SubItems.Add(Tablica[i].Wykonawca);
    Item.SubItems.Add(Tablica[i].Rodzaj);
    Item.SubItems.Add(Tablica[i].Opis);
  end;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1