Delphi-PRAXiS
Seite 1 von 2  1 2   

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/)
-   -   Listview Spalten-Header beschriften? (https://www.delphipraxis.net/177206-listview-spalten-header-beschriften.html)

volksjammer 24. Okt 2013 12:59

Listview Spalten-Header beschriften?
 
Tach Delphi-Freunde!!!
Ich kann keine Möglichkeit finden, die Header der Spalten zu benennen!
Weder im OI noch im iNet fündig geworden. Meine OH funzt auch nicht mehr:?
Gibt es hierfür eine passable Lösung??

VIELEN DANK im Voraus!:wink:!
Gruß Uli

TiGü 24. Okt 2013 13:07

AW: Listview Spalten-Header beschriften?
 
Das auf true setzen:
http://docwiki.embarcadero.com/Libra...wColumnHeaders

Dann entweder im OI per Columns-Eigenschaft Spalten anlegen und beschriften oder im Code:
http://docwiki.embarcadero.com/Libra...stView.Columns

Der schöne Günther 24. Okt 2013 13:08

AW: Listview Spalten-Header beschriften?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Die Spalten sind aber meine ich nur sichtbar, wenn der ViewStyle des TListView auf vsReport steht.

volksjammer 24. Okt 2013 13:28

AW: Listview Spalten-Header beschriften?
 
Moin TiGÜ!!!
DANKE Dir für superschnelle Antwort!
Immerhin gibt es doch noch Infos hierzu.
Doch komme ich damit leider nicht weiter..
Columns ist auf True.
Im ColumnsEditor kann ich Columns hinzufügen und löschen,
Nicht aber benennen und die Eigenschaft Caption erscheint in meinem OI garnicht!
Sollte ich auf die Listview mit Spalten verzichten müssen??

volksjammer 24. Okt 2013 13:32

AW: Listview Spalten-Header beschriften?
 
Ja schöner Günter!
Die SpaltenHeader sind ja sichtbar!
ViewStyle steht auf vsreport!
Sind sind eben unbeschriftet!
Will sie mit 'Datum', 'Betrag' usw. benennen. Ufff:oops:
DANKE auch Dir!

Popov 24. Okt 2013 13:35

AW: Listview Spalten-Header beschriften?
 
Das Beispiel ist aus der OH (ComCtrls vorher einfügen):

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
const
  Names: array[0..5, 0..1] of string = (
    ('Rubble', 'Barney'),
    ('Michael', 'Johnson'),
    ('Bunny', 'Bugs'),
    ('Silver', 'HiHo'),
    ('Simpson', 'Bart'),
    ('Squirrel', 'Rocky')
    );

var
  I: Integer;
  NewColumn: TListColumn;
  ListItem: TListItem;
  ListView: TListView;
begin
  ListView := TListView.Create(Self);
  with ListView do
  begin
    Parent := Self;
    Align := alClient;

    ViewStyle := vsReport;

    NewColumn := Columns.Add;
    NewColumn.Caption := 'Last';
    NewColumn := Columns.Add;
    NewColumn.Caption := 'First';

    for I := Low(Names) to High(Names) do
    begin
      ListItem := Items.Add;
      ListItem.Caption := Names[I][0];
      ListItem.SubItems.Add(Names[I][1]);
    end;
  end;
end;

volksjammer 24. Okt 2013 13:39

AW: Listview Spalten-Header beschriften?
 
Ich versuche meine OH neu zu inst.!
ComCtrls ist eingebunden!
DANKE für das Code-Beispiel!!
Werde mich hoffnungsvoll hineinstürzen!

volksjammer 24. Okt 2013 13:45

AW: Listview Spalten-Header beschriften?
 
Ist was umständlich, aber es funzt! DANKE nochmal!!!:thumb:

TiGü 24. Okt 2013 13:50

AW: Listview Spalten-Header beschriften?
 
Zitat:

Zitat von volksjammer (Beitrag 1233030)
Im ColumnsEditor kann ich Columns hinzufügen und löschen,
Nicht aber benennen und die Eigenschaft Caption erscheint in meinem OI garnicht!

Vom OI und dem Columns-Editor hätte ich gerne Screenshots, dass glaube ich nämlich nicht.

Siehst du die anderen Eigenschaften der Column wie z.B. Width, Height, ImageIndex, Alignment oder Autosize?

Ich bin sicher, es ist ein Layer 8 Problem!

baumina 24. Okt 2013 13:51

AW: Listview Spalten-Header beschriften?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Im Objektinspektor müsste das Ganze so aussehen:


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:35 Uhr.
Seite 1 von 2  1 2   

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