CCPack OnCreate

**ADelph**

Hi,

vielleicht weiß hier ja jemand, warum meine Idee nicht funktioniert.

Ich probiere gerade die CCPack Beispiele.

Im Beispiel FourLists, bzw. in der entworfenen Komponente 'CCCustomBox' habe ich dies ergänzt:

zusammenfalten · markieren

Delphi-Quellcode:

			
procedure TCustomBox.BoxCreate(Sender: TObject);

var

 iA : integer;

begin

 TheLabelCtrl.Caption:=Random(199).ToString;

 for iA:=1 to 100 do

  TheListBoxCtrl.Items.Add(iA.ToString);

 TheListBoxCtrl.ItemIndex:=0;

end;

Aber es funktioniert nicht. Das Ergebnis ist dies (Siehe Grafik):
Also die Caption des Labels wird gesetzt, aber die Items der ListBox nicht.

Vielleicht sehe ich den Wald vor lauter Bäumen nicht, aber ich verstehe den Unterschied nicht - also weshalb wird die ListBox nicht richtig angezeigt?

Tipps sind sehr willkommen!
Grüße

CCPack OnCreate

CCPack OnCreate

Stichworte

Forumregeln