ListView Problem

[Alois]

Warum kriege ich keine Spaltenüberschrift im ListView-Objekt angezeigt?? Nur der graue Balken wird angezeigt.
Ich habe in der ListView-Eigenschaft RowSelect=True und ViewStyle=vsReport eingestellt.

Kriege es einfach nicht auf die Reihe.

Hoffentlich kann mir jemand weiterhelfen.

Gruss Alois ;)

Delphi-Quellcode:

procedure TfrmMain.FormCreate(Sender: TObject);
var
   Spalte: TListColumn;
   Zeile: TListItem;

begin
     // Liste mit Dateinamen generieren
     strList := TStringList.Create();

     lvwQueue.Columns.Clear;

     // Spalte mit Dateinamen erzeugen
     Spalte := lvwQueue.Columns.Add;
     Spalte.Caption := 'Name';
     Spalte.Width := 150;

     // Spalte mit Dateigröße erzeugen
     Spalte := lvwQueue.Columns.Add;
     Spalte.Caption := 'Größe';
     Spalte.Width := 75;

     lvwQueue.Items.Clear;

     Zeile := lvwQueue.Items.Add;
     Zeile.SubItems.Add('Zeile1');
     Zeile.SubItems.Add('Zeile2');
end;

[Basic-Master]

setz bei der column noch zusätzlich die parent-eigenschaft auf dein listview, dann müsste es gehen ;)

[ken_jones]

Hab eine Listview auf mein Form geknallt, RowSelect und ViewStyle angepasst und deinen Code in mein OnFormCreate kopiert und ein bisschen geändert (nur kosmetisch), und das ganze läuft sauber:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
   Spalte: TListColumn;
   Zeile: TListItem;

begin
     lvwQueue.Columns.Clear;

     // Spalte mit Dateinamen erzeugen
     Spalte := lvwQueue.Columns.Add;
     Spalte.Caption := 'Name';
     Spalte.Width := 150;

     // Spalte mit Dateigröße erzeugen
     Spalte := lvwQueue.Columns.Add;
     Spalte.Caption := 'Größe';
     Spalte.Width := 75;

     lvwQueue.Items.Clear;

     Zeile := lvwQueue.Items.Add;
     Zeile.Caption := 'Spalte 1';
     Zeile.SubItems.Add('Spalte2');
end;

Die Zeile "strList := TStringList.Create();" hab ich einfachheitshalber rausgenommen. Läuft bei dir der Code überhaupt sauber durch?

[Alois]

Vielen Dank für die schnellen Antworten. :-D

Die Lösung für mein Problem war aber leider nicht dabei..
Deshalb hänge ich mal meine Quelle an.

Wäre nett, wenn sich das jemand anschauen könnte.

Gruss Alois ;)

[Matze]

Hallo!

Das kannst du noch nicht im OnCreate erledigen. Schreibe es z.B. ins OnShow des Formulars.

[Alois]

Matze!! Du hast recht. Die Spalten werden erst bei ShowForm angezeigt.

Gruss Alois ;)