Discussion :

[dridri86]

Bonjour

J'ai 3 speedbtns dans une groupbox et 1 speedbtn en dehors.

Je voudrais que les 4 boutons soient autoexclusifs.

Pour ce faire, j'ai mis groupindex à 1 sur chacun des 4 boutons.

Cela marche bien pour les 3 qui sont dans la groupbox mais pas pour le 4ème
qui est en dehors de la groupbox.

Pourquoi?

Est-ce le fait qu'ils ne soient pas tous dans la groupbox?

Sinon comment faire?

D'avance merci

[dd16]

A priori, comme tes boutons n'ont pas le meme parents (gourpbox dans un cas et frame dans l'autre), je suppoose que cela provoque ton problème d'exclusivité qui ne s'effectue pas

Essaye de te debrouiller pour que des 4 speedbutton soit sur le meme parents et ca devrait marcher

[OutOfRange]

Salut
Tu peux aussi le gérér par programmation...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
speedbutton4.Down:=(speedbutton1.Down)and(speedbutton2.Down)and(speedbutton3.Down);
end;
 
procedure TForm1.SpeedButton4Click(Sender: TObject);
begin
  speedbutton1.Down:=false;
  speedbutton2.Down:=false;
  speedbutton3.Down:=false;
end;

SpeedButton4 est le turbobouton en dehors de mon groupbox et l'événement onclick des speedbuttons1, 2 et 3 est le même, bien sûr

Pour que ça marche, il faut aussi que la propriété allowallup des 4 btn soit true

[dridri86]

Merci out of range

Cela marche comme je voulais