Discussion :

[$grm$]

Bonjour,
Je souhaiterai afficher toutes les données d'un champ d'une table dans un TDBComboBox. J'utilise PostgreSQL, un driver odbc, et TDataBase.
Je déclare un TQuery sur la fiche contenant mon TDBComboBox... et là je suis un peu coincé pour ce qui est des commandes à faire. J'ai mis ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add("SELECT id_articles FROM articles_tbl");
Query1->Open();
Query1->First();
while(!Query1->Eof)
{
  Query1->SQL->Add(Query1->FieldByName("id_articles")->AsString);
  Query1->Next();
}

dans la méthode:

Code :

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

void __fastcall TFormArticles::DBComboBox1Change(TObject *Sender)

C'est vraisemblablement faux tout ça. Donc si quelqu'un pouvait m'apporter ses lumières, je lui serai très reconnaissant.
Merci d'avance
Cordialement

[bakaneko]

Si je me rappelle bien, un TDBComboBox fonctionne un peu comme un TDBGrid. Tu exécutes une requète à l'aide d'un Query pour obtenir tes différentes données puis tu lies ton Query à ton DBComboBox pour y mettre les valeurs résultants de ton Query.

Perso, je te recommenderai plus d'utiliser un TComboBox que tu remplis à l'aide d'une boucle avec les résultats de ta requète (je trouve ça plus souple).

[bakaneko]

J'ai retrouvé la solution pour remplir un TDBComboBox.
1 - un TQuery ouvert avec ta requète
2 - un TDataSource lié à ton Query
3 - le DataSource lié au TDBComboBox via la propriété DataSource
4 - dans la propriété DataField de ton DBComboBox, tu précises le champs qui sert à indiquer les valeurs à mettre dans le DBComboBox.

Fini!!!

[$grm$]

Merci beaucoup bakaneko pour tes réponses, aurais-tu par hasard un bout de code pour l'utilisation d'un TComboBox (une boucle sur toute une colonne d'une table), parce que là y a une couille dans le patté...
Merci beaucoup d'avance encore une fois
Cordialement

[bakaneko]

Voici un code que j'utilise (donc qui marche) avec les TADOQuery.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Query->Close();
 Query->SQL->Clear();
 Query->SQL->Add("SELECT VOIE_NOM FROM VOIE ORDER BY 1");
 Query->Prepared = true;
 Query->Open();
 Application->ProcessMessages();
 for (int i = 0;i < Query->RecordCount;i++)
 {
  Voie_Nom->Items->Add(Query->FieldByName("VOIE_NOM")->Text);
  Query->Next();
 }

Pour que ça marche avec les TQuery, je pense qu'il faut que tu remplaces le Query->FieldByName("VOIE_NOM")->Text par Query->FieldValues["VOIE_NOM"] mais je n'en suis pas sûr.

[$grm$]

Bonjour, en fait j'ai réussi à le faire marcher en faisant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add("SELECT id_articles FROM articles_tbl ORDER BY id_articles DESC LIMIT 10");
//Query1->Prepare();
Query1->Open();
Query1->First();
while(!Query1->Eof)
{
  ComboBox1->Items->Add(Query1->FieldByName("id_articles")->AsInteger);
  Query1->Next();
}

Par contre, quand un utilisateur choisi une des valeurs dans la TComboBox, je voudrais la récupérer(la valeur) pour la réutiliser dans une autre requête. Est-ce qu'il y aurait une variable du type ComboBox->Value?
Un grand merci d'avance
Cordialement

[bakaneko]

Tu peux faire:

Code :

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

ComboBox->Text

qui te donne l'élément écrit dans le combobox

ou

Code :

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

ComboBox->Items->Strings[ComboBox->Itemindex]

qui te donne l'élément présent dans la liste d'Items du ComboBox à l'endoit sélectionné.