Bonjour,
J'ai un problème avec une combo box qui doit être remplie de date au format : mois année (Juillet 2010) mais lors de son remplissage mes dates sont toujours fausses et il m'affichent :
Juillet 1905 peu importe le mois de départ c'est toujousr juillet 1905 qui apparait...
Voici mon code :
Code Delphi :
Je peux pas mettre .AsDateTime au lieu de .AsInteger car il me sort l'erreur suivant : "cannot acces to the field 'mois' AsDateTime"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 ComboBoxCaisse.Items.Clear; ADOQuery1.Close; ADOQuery1.SQL.Text := 'SELECT DISTINCT MONTH(Djourn) AS mois, YEAR(Djourn) AS annee FROM caisse'; ADOQuery1.Open; ADOQuery1.First; while not ADOQuery1.Eof do begin dte := ADOQuery1.Fields.Fields[0].AsInteger + ADOQuery1.Fields.Fields[1].AsInteger; Showmessage(DateToStr(dte)); Showmessage(ADOQuery1.Fields.Fields[0].AsString + '/' + ADOQuery1.Fields.Fields[1].AsString); ComboBoxCaisse.Items.Add(FormatDateTime('mmmm yyyy',dte); ADOQuery1.Next; end; ADOQuery1.Close;
Si vous avez une autre méthode je suis preneur, sachant que dans ma base de donnée le champ Djourn est de la forme :
jj/mm/yyyy
et qu'il peut y avoir des doublons de journée du genre :
30/07/2010
30/07/2010
et que dans ma comboBox seul le mois et l'année doivent être affichée de facon unique pour chaque combinaison.
Ma combobox me permet de mettre a jour une grid en n'affichant que les journée correspondant au mois et à l'année sélectionnés dans ma combobox.
En espérant avoir été clair :/
Si quelqu'un pouvait éclairer ma lanterre sur le pourquoi du comment de l'erreur de calcul de ma date ou d'affichage :/
Merci.
Partager