Zitat von
DeddyH:
Mit der TListview geht das etwas anders, da Du auch SubItems brauchst. Hier einmal ein Beispiel (alles im Quellcode gemacht, was auch im
OI ginge):
Delphi-Quellcode:
procedure TfrmListViewDemo.FormCreate(Sender: TObject);
var Item: TListItem;
Column: TListColumn;
begin
//Einstellen des ViewStyle
ListView1.ViewStyle := vsReport;
//Anlegen von 2 Spalten
Column := ListView1.Columns.Add;
Column.Width := 150;
Column.Caption := 'Name';
Column := ListView1.Columns.Add;
Column.Width := 150;
Column.Caption := 'Vorname';
//Einfügen der Einträge
Item := ListView1.Items.Add;
Item.Caption := 'Mustermann';
Item.SubItems.Add('Max');
Item := ListView1.Items.Add;
Item.Caption := 'Korn';
Item.SubItems.Add('Klara');
Item := ListView1.Items.Add;
Item.Caption := 'Walker';
Item.SubItems.Add('Johnny');
end;
Das sieht dann so aus wie im Anhang.
Das könnte funktionieren.
Nur iwie schaff ichs nit den code so an zu passen, dass der mein offenes Array akzeptiert