J'ai honte, mais chui pas sur de tout comprendre...
J'explique, j'ai dans une frame 2 GroupBox imbriquées, admettons que la plus grande s'appelle GBPLUS_GRANDE et la petite ...... GBPLUS_PETITE.
J'ai des checkBox dans la petite (4 au total), et dans l'autre j'ai des Tedits. (4 aussi)
Bon le but est de Rendre la propriete enabled a false du Tedit correspondant a sa checkbox.
le checked ne passe pas, il n'arrive pas a voir que le controls[i] est une checkbox et donc je n'est pas acces aux proprietées de la checkbox.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 for i := 0 to 3 do if GBPETITE.controls[i].[u]checked[/u]=true then case i of 0: MessageScheduler:= MessageScheduler + TBHeure.Text; 1: MessageScheduler:= MessageScheduler + TBJour.Text; 2: MessageScheduler:= MessageScheduler + TBSemaine.text; 3:MessageScheduler:= MessageScheduler + TBMois.text; end;//case end;/if END; //if
Avant je n'avais qu'un Group box et je rajoutais la ligne suivante pour detecter si ct une checkbox ou pas
et le case c simplement pour le meme probleme d'acces aux proprietes des Tedits (comme y'en a 4 ben g fait un select case sur les 4)...
Code : Sélectionner tout - Visualiser dans une fenêtre à part if controls[i].inheritsFrom(Tcheckbox) then
Je doit vraiment etre con, paskeuh je comprends pas comment on accede aux enfants d'un Groupe de controls ou d'autres composant de ce type..
Partager