Discussion :

[navis84]

Bonjour !

Sur une feuille, j'ai posé un DBLookUpComboBox qui récupère la liste des familles de produits.
J'ai posé aussi un DBGrid qui doit afficher la liste des produits correspondants à la famille sélectionnée dans le DBLookUpComboBox.

J'ai créé la procédure stockée suivante sous SQL Server :

Code :

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

1
2
3
4
5
6
7
8
 
CREATE PROC ps_ListePdtParFamille
(@num_type int)
AS
SELECT * 
FROM produit
WHERE no_type = @num_type
ORDER BY design_pdt

Sous Delphi, j'ai placé le code suivant sur l'événement OnCloseUp du DBLookUpComboBox :

Code :

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

1
2
3
4
 
      procLstPdtParFamille.Close;
      procLstPdtParFamille.Parameters.ParamByName('@num_type').Value := cbxLstModifPdt.KeyValue;
      procLstPdtParFamille.Open;

Hors, à l'exécution, le problème suivant se pose lorsque je choisis une famille dans la liste :
procLstPdtParFamille: Paramètres '@num_type' non trouvés

Comment résoudre ce problème ??

Merci d'avance pour votre aide,
@+

[navis84]

J'ai finalement trouvé l'erreur,
il faut écrire :

Code :

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

1
2
3
4
5
 
procLstPdtParFamille.Close;
procLstPdtParFamille.Parameters.ParamByName('@num_type').Value := cbxLstModifPdt.KeyValue;
procLstPdtParFamille.ExecProc;
procLstPdtParFamille.Open;

Par contre, je ne peux changer d'élement dans la liste. Si je clique sur un autre element, il y a une erreur de mémoire car la nouvelle valeur du procLstPdtParFamille.Parameters.ParamByName('@num_type').Value n'est pas prise en compte...

Comment résoudre cette erreur ?
Merci d'avance.

[Amenofis]

Salut,

tu dois faire un Clear sur Parameters avant de changer la valeur dans ta ligne procLstPdtParFamille.Parameters.ParamByName('@num_type').Value := cbxLstModifPdt.KeyValue;

@+

[Andry]

Sinon, il faut que tu ferme ta procedure stoqué avant de changer le paramètre avec la methode Close

A+