Modifier une donnée dans une base de donné en utilisant son referentiel

Bonjour
Un probleme qui se pose a moi aujourd'hui est le suivant:
Lorsque j'utilise le code qui suit :

//Table_piece.First; //While not Table_piece.Eof do //begin //If Table_pieceReference.value = Refe_piece then //begin //Nomtext.text:= Table_pieceNom.value ; //Stocktext.text:= inttostr(Table_pieceStock.value) ; //Box_type.text:= Table_pieceType.value ; //Box_marques.text:= Table_pieceMarque.value ; //Prixtext.text:= inttostr(Table_piecePrix_en_Euros.value) ; //Table_piece.Next; //end; //end;

Je cherche a afficher des informations concernant une piece en particulier , le programme se compile mais lorsque je lance la fenetre qui contient ce code le processus plante et je ne parviens pas a comprendre pourquoi. Merci de votre aide

C'est parce que tu boucles toujours sur el même enregistrement. Tu crois que l'application plante, mais c'est toi qui t'es planté. Voici le code rectifié :

Table_piece.First; While not Table_piece.Eof do begin If Table_pieceReference.value = Refe_piece then begin Nomtext.text:= Table_pieceNom.value; Stocktext.text:= inttostr(Table_pieceStock.value) ; Box_type.text:= Table_pieceType.value ; Box_marques.text:= Table_pieceMarque.value ; Prixtext.text:= inttostr(Table_piecePrix_en_Euros.value) ; //ajouter la ligne suivante si tu souhaites t'arrêter //sur le premier enregistrement trouvé break; end; //la ligne suivante a été déplacée Table_piece.Next; end;

En clair, tu ne déplaçais le curseur que lorsque Table_pieceReference.value = Refe_piece.

Pour améliorer la vitesse de ton application, surtout s'il s'agit de boucler sur les enregistrements, il fauvrait mieux utiliser AsInteger que de transtyper le retour d'une propriété Value qui est elle même un variant codé sur 32 octets.
Par exemple, au lieu de :
Stocktext.text:= inttostr(Table_pieceStock.value) ;
Il est plus efficace d'écrire :
Stocktext.text:= Table_pieceStock.AsInteger ;
De même :
Nomtext.text:= Table_pieceNom.value;
peut être emplacé par :
Nomtext.text:= Table_pieceNom.AsString;
May Delphi be with you

decidement tu m aura bien aidé aujourd hui encore merci a toi

Bon apparement cela marche mais le probleme que je rencontre encore est que une fois l'enregistrement trouvé il me faux le modifier : Si je lemodifie sans autre commande au prealable , le projet bug en me reportant que la table n est pas en mode insertion . Soit , je me décide a mettre un table_piece.insert qui sera cloturé par un table_piece.post mais un nouveau probleme survient a savoir que ce n est pas l'enregistrement en cour qui est modifié mais bel et bien un nouvel enregistrement créé . Y aurait t il une commande aprochante de Insert qui me permette de mettre a jour ces données ?

Pour modifier un enregistrement, il faut faire appel à la méthode Edit du composant table ou requête (au lieu de Insert).
May Delphi be with you