Discussion :

[tleboukaka]

Slt à tous

j'ai du mal à réaliser une requête paramétrée (2 parametres) en Delphi, qui doit s'ouvrir quand on cliquera sur le bouton Executer. Voir le détail dans la pièce jointe attachée (ExempleRequete).

Je vous prie de bien vouloir ouvrir la pièce jointe pour comprendre le problème que j'ai posé.

Merci

[evarisnea]

grosso modo le principe de ce que tu veux faire c'est quoi:

• sélection des critères dans les listes
• clic sur le bouton exécuter
• application des paramètres à la requête
• exécution de la requête
• affichage des résultats

le premier point est déjà implémenté si je m'en tiens à l'image dans le document word.
quel composant utilises tu pour ta requête ?
voici un code de tête, j'utiliser arbitrairement un TQuery, sachant que ce composant contient une requête ayant pour paramètres Param1 et Param2 :

Code :

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

1
2
3
4
5
6
7
8
9
10
procedure TForm1.Button1Click(Sender: TObject);
begin
  TQuery1.Close();
  //application des paramètres à la requête
  TQuery1.ParamByName('Param1').AsInteger := DBLookupCombobox1.ListSource.Dataset.FieldByName('id_scolarite').AsInteger;
  TQuery1.ParamByName('Param2').AsInteger := DBLookupCombobox1.ListSource.Dataset.FieldByName('id_classe').AsInteger;
  //exécution de la requête
  TQuery1.Open();
  //affichage ...
end;