Récupération d'une requête SQL dans un ComboBox

Version imprimable

26/12/2010, 00h54
Hoopsy

Récupération d'une requête SQL dans un ComboBox
Bonjour à tous,

J'aimerais récupérer le résultat d'une requête sql dans un ComboBox, voici un exemple de ma requête sql :
Code:

1 2 3 4 Form1.ADOQuery1.SQL.Clear; Form1.ADOQuery1.SQL.Text:= ('SELECT Date FROM Table GROUP BY Date'); Form1.ADOQuery1.Open;
Mais après je sèche, je ne sais pas quoi mettre dans ma Form1.ComboBox1.Items pour que ça fonctionne :calim2:.

Si vous avez une idée, ça serait cool de m'aider ;).

Salutations,
H.

Ce code vous permet de réaliser votre besoin étrange : :D

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
procedure TSDIAppForm.Button1Click(Sender: TObject);
var VAL    : String;
    FIELD     :string;
    I         : Integer;
Begin
Query1.SQL.Clear;
Query1.SQL.Text:= ('SELECT * FROM Table');
Query1.Open;
  FOR I:=0 TO Query1.FIELDS.Count-1 Do
      Field:=Field+(Query1.FIELDS[I].FieldName+' ');
ComboBox1.Items.add(field);
ComboBox1.Items.add('_________');
Query1.First;
While NOT(Query1.Eof) Do
Begin
  val:='';
  FOR I:=0 TO Query1.FIELDS.Count-1 Do
  Begin
      IF (Query1.FIELDS[I] IS TStringField) then
          FIELD:='"'+Query1.FIELDS[i].AsString+'"'
          else FIELD:=Query1.FIELDS[i].AsString;
      Val:= Val + FIELD;
  end;
  ComboBox1.Items.add( Val );
  Query1.Next;
End;
end;

Bon courage.

26/12/2010, 07h48
redoran

avis
Slt ;
Code:

1 2 3 Form1.ADOQuery1.SQL.Clear; Form1.ADOQuery1.SQL.Text:= ('SELECT Date FROM Table GROUP BY Date'); Form1.ADOQuery1.Open;
évite de nommé des champ avec la même syntaxe des SGBD exemple Date , au lieu de le nommé date essaye avec dateentre ou dt1.....sinon vous aurai plus tard des problèmes avec les exécutions des requêtes ;)
26/12/2010, 21h06
Hoopsy

Bonsoir à tous,

Merci merci merci, ça marche nickel, le truc c'est que ma base de données et sous sql server 2008 et l'interface en Delphi, et comme ma base de données est super volumineuse alors du coup je veux laisser le choix à l'utilisateur d'afficher qu'une partie des données, moi j'affiche par défaut celles de 2 mois ;).

Je ferai attention aux noms des champs :ccool:.

Merci encore.

Salutations,
H.