Discussion :

[Giovanny Temgoua]

Bonjour !

La FAQ Delphi a désormais plus de 700 QRs

Merci à tous les contributeurs.

[anapurna]

salut

je regrette que dans la faq vous n'ayez pas mis les deux elememts suivant

Q : comment rendre invisible/visible un item d'un radiogroup

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
procedure RGB_ShowItem(RadioGroup: TRadioGroup; ItemIndex: Byte; bVisible: Boolean);
begin
  RadioGroup.Controls[ItemIndex].Visible := bVisible;
end

;

et
Q : comment rendre Enable/disable(grisé) un item d'un radiogroup

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure RGB_EnableItem(RadioGroup: TRadioGroup; ItemIndex: Byte; bEnabled: Boolean);
begin
  RadioGroup.Controls[ItemIndex].Enabled := bEnabled;
end;

meme si le principe et le meme la fonction n'est pas tout à fait identique

@+ Phil