![]() |
ListView Problem
Liste der Anhänge anzeigen (Anzahl: 1)
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; |
Re: ListView Problem
setz bei der column noch zusätzlich die parent-eigenschaft auf dein listview, dann müsste es gehen ;)
|
Re: ListView Problem
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? |
Re: ListView Problem
Liste der Anhänge anzeigen (Anzahl: 1)
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 ;) |
Re: ListView Problem
Hallo!
Das kannst du noch nicht im OnCreate erledigen. Schreibe es z.B. ins OnShow des Formulars. |
Re: ListView Problem
Matze!! Du hast recht. Die Spalten werden erst bei ShowForm angezeigt.
Gruss Alois ;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz