RadioButton [Résolu]

watrem 52 Messages postés samedi 15 octobre 2005Date d'inscription 17 août 2008 Dernière intervention - 7 août 2008 à 12:19 - Dernière réponse : f0xi 4304 Messages postés samedi 16 octobre 2004Date d'inscription 9 mars 2018 Dernière intervention
- 7 août 2008 à 16:12
Bonjour a tous J'ai des petits soucis au niveau des codes avec les radiobuttons.
Quand j'en est 2 la ligne de code que j'ecrit est :

begin
if radiobutton1.Checked=true then  radiobutton2.Checked:=false;
Total:= Essai * 2;
Label5.Caption :=Label5.Caption + FloatToStr(Total);
end.

Mais si j'en est 3 ou + Que dois-je ecrire ?

Je rencontre egalement un probleme au niveau de l'affichage
A) quand je choisi un radiobutton il me marque bien le resultat , si ensuite je choisi le deuxieme il m'affiche bien le resultat du 2 ieme mais me laisse le resultat du 1 er egalement ( comment faire pour qu un seul resultat soit afficher?)

B) Les resultats afficher se presente sous la forme : 100000000 et je n'arrive pas a utiliser la command "thousand separator" pour avoir un affichage 1 000 000
Comment dois je proceder?

Merci a ceux qui m'aiderons
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
BernieNoel68 97 Messages postés vendredi 12 octobre 2007Date d'inscription 20 novembre 2009 Dernière intervention - 7 août 2008 à 13:49
3
Merci
Tu peux utiliser TRadioGroup plutot que plusieurs TRadioButton.

Ensuite, tu complète la propriété Items du TRadioGroup (1 ligne = 1 RadioButton)

Merci BernieNoel68 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 101 internautes ce mois-ci

Commenter la réponse de BernieNoel68
Utilisateur anonyme - 7 août 2008 à 12:58
0
Merci
Salut,

1)Quand tu as une liste de RadioButton, si tu clique sur un il sera checké alors que les autres ne le seront pas. De ce fait tu n'as rien à coder pour les controler.

2) : regarde dans l'aide
ComponentCount
ComponentIndex
Components

3) http://www.delphibasics.co.uk/RTL.asp?Name=ThousandSeparator

En conclusion : une question par topic stp et merci de chercher avant de demander de l'aide .
Commenter la réponse de Utilisateur anonyme
f0xi 4304 Messages postés samedi 16 octobre 2004Date d'inscription 9 mars 2018 Dernière intervention - 7 août 2008 à 16:12
0
Merci
begin
  { inverseur booléen }
  RadioButton1.Checked := not RadioButton1.Checked;
  { not true = false
     not false = true
  }
  <strike>if radiobutton1.Checked=true then  radiobutton2.Checked:=false;</strike>
  Total := Essai * 2;
  Label5.Caption := Label5.Caption + FloatToStr(Total);
end.


reponse a question B :

var
  I : integer;
  F: single;
begin
  I := round(PI * 1000000);
  F := Pi * 1000000;
  LabelX.Caption := Format('%.0n  //  %.4n', [I+0.0, F]);
end;

(voir mon tuto sur la fonction Format)

<hr size="2" width="100%" />
Commenter la réponse de f0xi

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.