Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TListView - Columns (https://www.delphipraxis.net/34851-tlistview-columns.html)

schuetze09 29. Nov 2004 11:55


TListView - Columns
 
Hallo,

ich habe folgendes Problem: in meinen Listview (vsReport) habe ich zwei Spalten, es werden aber immer 3 angezeigt, also die dritte ist eine endlose... kriegt man die irgendwie weg (so das man nur die definierten Spalten sieht)?

MfG
schuetze09

kiar 29. Nov 2004 12:01

Re: TListView - Columns
 
hallo schütze ,

passe die breite deines listviews an die anzahl der spalten an.
Delphi-Quellcode:
with LV do
      begin
        Width := 0;
        For i:= 0 to columns.Count-1 do
          begin
            Width:= Width + Column[i].Width ;
          end;
        width:= width + LV_HILF_WIDTH; // ist ne hilfsvariable, die die randbreite addiert
      end;
raik

schuetze09 29. Nov 2004 12:15

Re: TListView - Columns
 
Super!!! DANKE....

MfG
schuetze09 :lol: :lol:

Sharky 29. Nov 2004 12:35

Re: TListView - Columns
 
Zitat:

Zitat von schuetze09
Super!!! DANKE....

War das nicht auch irgenwie möglich in dem man für die "letzte" Spalte die Breite auf -1 stellt?
Oder verwechsele ich das jetzt? (Habe hier kein Delphi zur Hand)

schuetze09 29. Nov 2004 13:01

Re: TListView - Columns
 
ne, mit -1 bei der letzten Spalte funktioniert leider nicht.

die Variante von Kair ist schon cool, leider habe ich jetzt noch die vertikalen Scrollbars drin...

Sharky 29. Nov 2004 13:12

Re: TListView - Columns
 
Zitat:

Zitat von schuetze09
ne, mit -1 bei der letzten Spalte funktioniert leider nicht....

Hai schuetze09,

schaue doch mal in diesen Thread. Da wird das mit dem -1 bzw. -2 beschrieben.

schuetze09 29. Nov 2004 14:51

Re: TListView - Columns
 
Besten Dank, so gehts (-:


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:28 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz