Delphi-PRAXiS
Seite 2 von 2     12   

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 Items Horizontal nebeneinander anzeigen (https://www.delphipraxis.net/116399-items-horizontal-nebeneinander-anzeigen.html)

PatrickB 3. Jul 2008 16:41

Re: Items Horizontal nebeneinander anzeigen
 
So, eigentlich klappt das jetzt gut, aber nur eigentlich.

Ich habe mir jetzt eine procedure gemacht die FillListView(Dir) heißt.
Führe ich im OnCreate-Ereignis meines Formulars diese Prozedur aus, so wird es ganz normal angezeigt.
Führe ich jedoch die Prozedur dann noch einmal aus, nach dem OnCreate-Ereignis, so wir der Inhalt des ListView abgeküzrt dargestellt.
Man sieht also nicht mehr den vollen Dateinamen, sondern nur noch die ersten 15 Buchstaben und dann ... also z.B.: meinDateinameis... und vorher siehts halt so aus: meinDateinameistganzlang.txt .
Woran liegt das nun?

Ich danke euch schonmal für eure hilfreichen Antworten =)

Gruß, Patrick

_frank_ 3. Jul 2008 16:58

Re: Items Horizontal nebeneinander anzeigen
 
Zitat:

Zitat von PatrickB
Mit einer Listbox werden die ja nur untereinander angezeigt.

nicht unbedingt...schau dir mal TListbox.Columns an ;) aber kann durchaus sein, dass TListview besser geeignet ist (z.b. wenn du icons haben willst).

HTH Frank

PatrickB 5. Jul 2008 07:54

Re: Items Horizontal nebeneinander anzeigen
 
Ja, aber ne wirkliche Antwort auf meine Frage hab ich jetzt immer noch nich..

Matze 5. Jul 2008 08:56

Re: Items Horizontal nebeneinander anzeigen
 
Hallo Patrick!

Versuche mal nach dem Füllen die Spaltenbreite auf -2 zu setzen:

Beispielsweise so für die erste Spalte:

Delphi-Quellcode:
// ListView füllen
ListView.Columns[0].Width := -2;
Grüße, Matze

PatrickB 8. Jul 2008 13:50

Re: Items Horizontal nebeneinander anzeigen
 
Da kommt dann ein Fehler:

Zitat:

Listenindex überschreitet das Maximum (0)

marabu 8. Jul 2008 15:24

Re: Items Horizontal nebeneinander anzeigen
 
Hallo,

wahrscheinlich hast du keine Column in deine ListView eingefügt.

Delphi-Quellcode:
begin
  with ListView do
    if Columns.Count > 0 
      then Column[0].Width := ColumnTextWidth
      else ShowMessage('Keine Spalten gefunden');
end;
-2 entspricht ColumnHeaderWidth - das scheint mir hier eher ungeeignet zu sein.

Grüße vom marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:57 Uhr.
Seite 2 von 2     12   

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-2025 by Thomas Breitkreuz