Muß ich etwas eine TColletionItemClass definieren und eine TCollectionItem, dann die TCollection so aufbauen, das meine
Items genauso reichen und schmecken wie ein CheckGroupItem.
Also so eine 1:1 Kopie der Vorgehensweise als würde ich sowas machen
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| for i:= 0 to high(TcxCheckGroupItemParam) do
begin
MyTcxCheckGroupItem:=MyTcxCheckGroup.Properties.Items.Add;
MyTcxCheckGroupItem.Caption:=TcxCheckGroupItemParam[i].Caption;
MyTcxCheckGroupItem.Enabled:=TcxCheckGroupItemParam[i].Enabled;
MyTcxCheckGroupItem.Tag:=TcxCheckGroupItemParam[i].Tag;
MyTcxCheckGroupItem.State:=TcxCheckGroupItemParam[i].State;
end; |
nur dann mit anderen Klassen (eben einer TCollectionItem, ...) um dann das Verhalten der Klasse
TcxCheckGroupItems nachzuprogrammieren
Christian S.
