vise variable i TListBox

Et eksempel (delvist fra Builderens help), ListView1 er en TListView:

__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
  const char Names[2][4][10] =
  {
    {"Rubble","Barny", "Aarhus", "Denmark"},
    {"Michael", "Johnson", "New York", "USA"}
  };

  TListColumn  *NewColumn;
  TListItem  *ListItem;

  ListView1->ViewStyle = vsReport;
  NewColumn = ListView1->Columns->Add();
  NewColumn->Caption = "Last";

  NewColumn = ListView1->Columns->Add();
  NewColumn->Caption = "First";

  NewColumn = ListView1->Columns->Add();
  NewColumn->Caption = "City";

  NewColumn = ListView1->Columns->Add();
  NewColumn->Caption = "Country";

  for (int i = 0; i < 2; i++)
  {
    ListItem = ListView1->Items->Add();
    ListItem->Caption = Names[i][0];
    ListItem->SubItems->Add(Names[i][1]);
    ListItem->SubItems->Add(Names[i][2]);
    ListItem->SubItems->Add(Names[i][3]);
  }
}

lukker