Thema: Delphi Spaltennamen in ListBox

Einzelnen Beitrag anzeigen

Steran

Registriert seit: 14. Jan 2003
42 Beiträge
 
#2
  Alt 4. Jul 2003, 09:39
Hi!!

Ich würde ein ListView verwenden, da tust du dich um einiges leichter!

Hier mal ein kurzes Beispiel, um die Spalten zu beschriften bzw. Items hinzuzufügen:

Code:
procedure TForm1.Button1Click(Sender: TObject);
var itm: TListItem;
begin
  //2 Neue Spalte hinzufügen
  ListView1.Columns.Add;
  ListView1.Columns.Add;

  //Spalten beschriften
  ListView1.Columns[0].Caption := '1. Spalte';
  ListView1.Columns[1].Caption := '2. Spalte';

  //Items hinzufügen
  itm := ListView1.Items.Add;
  itm.Caption := 'Item-Caption';
  itm.SubItems.Add('SubItem-Text');
end;
Im Objektinspektor aber zuerst ViewStyle auf vsReport stellen

MfG

Steran
  Mit Zitat antworten Zitat