Discussion :

[abkthekingABK]

Bonjour
J'ai un problème avec dbgrid.
Lorsque j'ajoute un nouveau produit est mis en place plus tôt ne sont pas transmises à la deuxième ligne avec la connaissance que je peux utiliser le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
procedure Tfiche_livration.Button1Click(Sender: TObject);
var Numpr,qte:String;
begin
Numpr:=InputBox('saisie du produit','entrer le code produit','');
if (numpr='')or(not (rech(strtoint(numpr)))) then
showmessage('se numero produit n"existe pas..')
else
begin
datas.Table12.Insert;
datas.Table12.FieldByName('ref_prod').AsString:=numpr;
datas.Table12.FieldByName('reper').AsString:=datas.Table14.fieldbyname('reper').AsString;
datas.Table12.FieldByName('nn').AsString:=datas.Table14.fieldbyname('nn').AsString;
datas.Table12.FieldByName('designation').AsString:=datas.Table14.fieldbyname('designation').AsString;
datas.Table12.FieldByName('qte_a_livr').AsString:=datas.Table14.fieldbyname('qte_a_alivr').AsString;
datas.Table12.FieldByName('poid_a_livr').AsString:=datas.Table14.fieldbyname('poid_a_livr').AsString;
qte:=inputbox('saisie la quantite du produit','entree la quantite','');
while qte='' do qte:=inputbox('saisie la quantite du produit','entree la quantite','');
datas.Table12.FieldByName('qte_livr').AsString:=qte;
datas.Table12.FieldByName('qte_rest').AsInteger:= Calcul1(datas.table14,datas.table12);
datas.Table12.FieldByName('poid_livr').AsInteger:= Calcul2(datas.table14,datas.table12);
datas.Table12.FieldByName('poid_rest').AsInteger:= Calcul3(datas.table14,datas.table12);
end;
Button1.SetFocus;

Quand puis-je modifier le code "insert" à "edit les informations sur le produit apparaît pas comme arrête le calcul du poids
Aide S'il vous plaît

[ShaiLeTroll]

Il manque le Post !
Sans le Post, les données ne sont pas stockées dans la table !
Mais je ne suis pas sur que cela soit la réponse que tu attends, désolé mais ta question n'est pas claire

Avant de poster, faudrait lire un peu plus la documentation : TDataSet.Insert

Insert insère une nouvel enregistrement vide dans l'ensemble de données.

Appelez Insert pour :
1 Ouvrir un nouvel enregistrement vide dans l'ensemble de données.
2 Faire de ce nouvel enregistrement, l'enregistrement actif.

Après un appel de la méthode Insert, une application peut permettre aux utilisateurs de saisir des données dans les champs de l'enregistrement, puis d'expédier ces modifications dans la base de données ou le journal des modifications en utilisant Post.

Tous tes sujets sur le SQL et sur le Delphi peuvent se résoudre par un minimum de recherche de ta part !
Tu indiques sur ton profil "Développeur informatique", du coup, on s'attend à avoir quelqu'un avec les bases !
Et vu tes interventions, tu es trop dans l'attente des réponses des membres du forum,
j'ai plusieurs fois eu l'impression de faire ton travail à ta place !

Si tu es étudiant ou un autodidacte tout juste débutant, corrige ton titre sur ton profil par "Etudiant" ou "Autodidacte Novice",
les membres sauront ainsi qu'il faut plutôt t'orienter vers du tutoriel pour débutant


Reprenons ton message

J'ai un problème avec dbgrid.
Lorsque j'ajoute un nouveau produit est mis en place plus tôt ne sont pas transmises à la deuxième ligne avec la connaissance que je peux utiliser le code suivant

En Français, que veux dire cette phrase incompréhensible ?

Code :

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

while qte='' do qte:=inputbox('saisie la quantite du produit','entree la quantite','');

Sympa la boucle infinie !
C'est une très mauvaise ergonomie ! Ton utilisateur va te détester !
De plus, tu peux ainsi mettre une lettre comme valeur de 'qte_livr' ce qui peut faire planter le programme

Button1, Table12, table14, Calcul1... pense à tes collègues qui vont devoir reprendre ton code !
C'est infame ! Tu serais dans mon équipe en période d'essai, je te ferais virer dans la minute si je voyais un code pareil !

Quand puis-je modifier le code "insert" à "edit les informations sur le produit apparaît pas comme arrête le calcul du poids

Encore une phrase qui n'a pas de sens !

[abkthekingABK]

Désolé ShaiLeTroll
J'ai une mauvaise habitude
Quand je commence un projet ,je ne me soucie pas droit par écrit jusqu'à la fin, et assurez-vous que le programme fonctionne efficacement
Et corriger en tapant à la fin

[Invité]

Désolé ShaiLeTroll
J'ai une mauvaise habitude
Quand je commence un projet ,je ne me soucie pas droit par écrit jusqu'à la fin, et assurez-vous que le programme fonctionne efficacement
Et corriger en tapant à la fin

Il va être très content de la réponse je pense

[ShaiLeTroll]

Il va être très content de la réponse je pense

Faut-il déjà la comprendre cette réponse

Quand je commence un projet ,je ne me soucie pas droit par écrit jusqu'à la fin, et assurez-vous que le programme fonctionne efficacement
Et corriger en tapant à la fin

Comme ça, une fois le projet fini et qu'il fonctionne,
tu repasses dessus pour faire du refactoring
donc au final, faut tout tester une seconde fois !
Quelle perte de temps !

Pourquoi ne pas faire bien dès le début ? !



Sinon, tu n'a pas éclairci ta demande.
On ne sait toujours pas quel est ton problème !