Impossible de mettre une info venant de ckeckbox dans tableau

Résolu
pratrick Messages postés 25 Date d'inscription vendredi 7 mars 2003 Statut Membre Dernière intervention 22 octobre 2010 - 27 mai 2010 à 19:41
pratrick Messages postés 25 Date d'inscription vendredi 7 mars 2003 Statut Membre Dernière intervention 22 octobre 2010 - 29 mai 2010 à 12:10
Messieurs bonjour
je me permet de venir vers vous pour vous poser ma question(de débutant) en effet ayant un ckeckbox que je doit cocher et l'information la mettre dans un tableau acces
j'ai commencé par

procedure TForm2.new_prb_bouchekcClick(Sender: TObject);

var
new_manoeuvrabilite : string ;
begin
if (Sender as TCheckBox).Checked then
new_manoeuvrabilite:='vrai';

else
new_manoeuvrabilite:='faux';
end;
end;


ensuite pour enregistrer cette valeur je clic sur le bouton Valider
et je fait cette procédure
je simplifie
pour info tous les boites tedit aucun problème

fieldbyname('manoeuvrob').Value :=new_manoeuvrabilite;
le problème et que le new_manoeuvrabilité n'est pas conserver
je suis toutes oui à vos proposition
voir trouver quelque chose de plus simple
merci

3 réponses

cs_MAURICIO Messages postés 2106 Date d'inscription mardi 10 décembre 2002 Statut Modérateur Dernière intervention 15 décembre 2014 5
28 mai 2010 à 13:26
Le problème est que ta variable est en local, c' est à dire qu' elle n' est connue que de la procedure "new_prb_bouchekcClick" vu que c' est là qu' elle est déclarée.
Il suffit de déplacer la déclaration de ta variable après "implementation" de ta unit, elle sera ainsi connue de toute la unit:

***********************************************
implementation

{$R *.dfm}

var
new_manoeuvrabilite : string ;
***********************************************


Maurício
3
pratrick Messages postés 25 Date d'inscription vendredi 7 mars 2003 Statut Membre Dernière intervention 22 octobre 2010 1
29 mai 2010 à 08:14
Tous d'abord merci de ta réponse
mais un petit probléme apparait en plus
la variable et garder en continue donc parfait
par contre impossible de l'enregistrer dans ma table il me dit qu'il faut boolean à la place de string alors que je veut enregistrer dans ma table un mot


fieldbyname('vilrob').Value := editnew_ville_rob.Text;
pas de probléme il m'enregistre ce mot dans ma table


fieldbyname('manoeuvrob').Value :=new_manoeuvrabilite;
par contre la message d'erreur
je ne comprend pas cette erreur
A+
3
pratrick Messages postés 25 Date d'inscription vendredi 7 mars 2003 Statut Membre Dernière intervention 22 octobre 2010 1
29 mai 2010 à 12:10
en effet ta methode marche
mais j'ai cherche trop compliquer
j'ai juste change new_manoeuvrabilite en boolean et la pas de probléme
merci de vos réponse
0
Rejoignez-nous