XP Stil + ListView Komponente

[BenjaminHelbig]

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