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 XP Stil + ListView Komponente (https://www.delphipraxis.net/51442-xp-stil-listview-komponente.html)

BenjaminHelbig 12. Aug 2005 12:50


XP Stil + ListView Komponente
 
Hi Leute,

ich habe den Code aus der CodeLibrary benutzt um den XP Stil in meiner Delphi 5 Anwendung zu ermöglichen.
Allerdings habe ich ein Problem mit den TColumns.
Ich erzeuge zur Laufzeit ein TListView mit:
Delphi-Quellcode:
          myListView.Parent := myPanel;
          myListView.Align := alClient;
          myListView.Color := $00F0E1FF;
          myListView.BorderStyle := bsnone;
          myListView.FlatScrollbars := true;
          myListView.GridLines := true;
          myListView.ViewStyle := vsReport;
Das klappt auch wunderbar. Wenn ich dann allerdings mit:
Delphi-Quellcode:
          myColumn := myListView.Columns.Add;
          myColumn.Caption := Fields2.Items[run].Caption;
          myColumn.AutoSize := true;
          myColumn := myListView.Columns.Add;
          myColumn.Caption := 'Anzahl';
          myColumn.AutoSize := true;
verschiedene Columns hinzufüge bekomme ich das CPU Fenster angezeigt. Mit F9 geht es dann aber einwandfrei weiter. Habt ihr eine Ahnung, woran das liegen könnte?

Grüße Ben

Daniel G 13. Aug 2005 20:17

Re: XP Stil + ListView Komponente
 
Wie "CPU Fenster"?

Wenn du das beim Debuggen meinst, ist das eigentlich normal. Es deutet imho dann nur darauf hin, das eine spezielle Unit nicht (nicht hauen, wenns falsch ist...) vorhanden ist.

Läuft das Programm denn außerhalb der Umgebung?

Sharky 14. Aug 2005 07:14

Re: XP Stil + ListView Komponente
 
Hai Ben,

leider fehlt bei deinem Code das "drum herum". Ist es zum Beispile möglich das Du in dieser Zeile:
Delphi-Quellcode:
myColumn.Caption := Fields2.Items[run].Caption;
Mittels deiner "run" Variablen auf ein Item zugreifst das es nicht gibt? Achja, wo erzeugst Du denn dein ListView?

BenjaminHelbig 14. Aug 2005 10:48

Re: XP Stil + ListView Komponente
 
Hallöchen, also ich hab mal genauer nachgeforscht. Außerhalb der Entwicklungsumgebung läuft es einwandfrei. Ich traue dem ganzen aber nicht so ganz, also hab ich mal mittels F8 im Debugmodus alles durchgespielt. Er zeigt mit das CPU Fenster an und mit F9 gehts dann ohne Fehler weiter. Das ganze macht er z.B. auch, wenn ich nur die Spaltenbreite eines Columns mit der Maus ändere.
Ich hab sowas noch nie gehabt. Ich kenne den Debugmodus nur so, dass er im CPU Fenster anhält, wenn er einen Fehler hat.

@Daniel: Ich glaub du hast Recht. Mittels F8 (wenn ich lange genug mich durch sämtliche Dateien gequält hab :)) zeigt er mir irgendwann an, dass er angeblich die Datei TAdvListView.pas nicht finden kann. Nach einem Klick auf ignorieren gehts aber einwandfrei weiter.

@Sharki: Ich erzeuge das ListView in einer ButtonClick Prozedur. Und mittels run greife ich auch nur auf vorhandene Einträge zu. Das hab ich getestet. Wäre schön, wenns das gewesen wäre.


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:00 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