Discussion :

[lilo415]

Bonjour,

J'utilise la version 7 de delphi, et j'ai un petit souci pour afficher le résultat d'une requête sql dans ma ComBoBox.

Voilà j'ai des contacts qui sont enregistrés dans la base de données et il sont organisés par groupe.
Par exemple pour le "groupe A"-> J'ai 4 Contacts "toto","test","titi", "youpi"

Donc l'application affiche la fiche contact, ici "test" avec nom, prenom, etc
Et je voudrais mettre dans ma ComboBox, la liste des contact appartenant à ce groupe sauf "Test".
Est-ce possible ?? j'ai essayer avec une requête mais ça ne marche pas.
Je pense que je ne sais pas trop où et comment mettre ma requête.

Merci d'avance pour votre aide.

Lilo

[Cl@udius]

Salut

Je dirais que ca doit être possible avec une requête !
Fais voir la requête que tu as essayé de mettre en place.

@+ Claudius

[lilo415]

Bonjour,

merci de répondre. Voilà ce que j'ai mis:

Code :

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

1
2
3
4
5
6
7
8
 
 procedure TForm.DBComboBox1Click(Sender: TObject);
begin
 
QueryMain.SQL.Clear;
QueryMain.SQL.Add('Select NOM, PRENOM from CONTACT where NOM <> NameContact');
QueryMain.Open;
end;

J'ai essayé de mettre la requête dans le sql de le ComboBox mais ça n'a pas marché.
Et j'ai meme essayé le datafield avec "NOM" mais il affiche que le nom "test" et rien d'autre

Voilà merci de ton aide.

Lilo

[Cl@udius]

Re,

Et je voudrais mettre dans ma ComboBox, la liste des contact appartenant à ce groupe sauf "Test".

La notion de groupe est absente de ta requête !

La requête pourrait être celle-ci:

SELECT nom, prenom FROM CONTACT
WHERE groupe = :Groupe and nom <> :NomContact
ORDER BY nom, Prenom;

ensuite pour l'appeler tu renseignes tes paramètres:

Code :

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

1
2
3
4
5
6
7
 
with QueryMain do begin
  Close;
  ParamByName('Groupe').Value := 'A'; // le groupe actuel 
  ParamByName('NomContact').Value := 'test'; // ton contact courant
  Open;
end;

@+

[lilo415]

Ok, merci

je vais testé ... mais ça ne marche pas, j'ai une erreur.

Logiquement ma reqête est :

Code :

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

1
2
3
 
SELECT CONTACTCLEUNIQ, NOM, PRENOM, CodeUser, GROUPE, NOMSOCIETE 
FROM VIEWCONTACT

Mais comme je change de nom ou le groupe sur chque fiche,je ne peux pas déclarer comme ça :

Cl@udius a écrit:
ensuite pour l'appeler tu renseignes tes paramètres:

with QueryMain do begin
Close;
ParamByName('Groupe').Value := 'A'; // le groupe actuel
ParamByName('NomContact').Value := 'test'; // ton contact courant Open;
end;

Est ce que je peux utiliser, quelque chose comme ça:

Code :

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

1
2
3
4
5
  ParamByName('NOM').Value := QueryMain.FieldByName('NOM').AsString; // ton contact courant
 
ou
 
  NameContact:= UpperCase(trim(DBNOM.EditText));

[aityahia]

si j'ai bien compri
vous voullez afficher dans le combobox les contacts d'un group

moi a votre place j'utiliserai une intégriter référencielle (avec la tabe group comme maitresse) et a DblookupCombobox.

[lilo415]

Bonjour,

Au départ j'avais utilisé un DbLookUpComboBox mais je ne sais pas m'en servir, donc j'ai utilisé un comboBox.

Si vous avez des explications à me donner pour que j'utilise un DbLookUpComboBox je suis prenante.

Merci d'avance

Lilo

[PadawanDuDelphi]

Salut,

Exemple: Tu relie ta Query à un TDatasource (appelons le Datasource1).
Tu pose ta DBLookUpComboBox, tu met le champs Source à la valeur datasource1, et la valeur keyfield au champs que tu veux afficher (ici "nom").

A+.