Salut à tous,
J'ai un petit souci au niveau de mon code. Je souhaiterais faire une mise a jour d'une table (table ligne_commande) à partir d'un TMemo. Voici mon code avec comme message d'erreur "Aucune valeur donnée pour un ou plusieurs des paramètres requis" :
Merci de votre aide !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 for i := 0 to memo_commande_gauche.Lines.Count do begin mon_adoquery.SQL.Clear; mon_adoquery.SQL.Add('update ligne_commande set num_ligne_commande=(num_ligne_commande+1), qte_ligne_commande=(article.stock_a_venir-article.stock_actuel), etat_ligne_commande="O" where article.ref_article=ligne_commande.ref_article and code_cmmf_article=:mon_article'); mon_adoquery.Parameters.ParamByName('mon_article').Value:=memo_commande_gauche.Lines[i]; mon_adoquery.ExecSQL; end;
Partager