DBLISTBOX et DBCOMBOBOX sur delphiRésolu

Question

sharif
bonjour
je tente de recevoir une liste des materiaux dans une TDBListBox et la list des agents dans un TDBComboBox, mais sans succés
malgré que 

Table1.active = true
DataSourse1.dataset = Table1
MyDBListBox.DataSourse = DataSourse1
MyDBListBox.DataField = Materiel

MyDBComboBox.DataSourse = DataSourse1
MyDBComboBox.DataField = Materiel

please helpe me

cs_cantador · Accepted Answer

Bonjour,

essaie comme ça :


Table1.Close;
DataSourse1.dataset = Table1;
MyDBListBox.DataSourse = DataSourse1;
MyDBListBox.DataField = Materiel;

MyDBComboBox.DataSourse = DataSourse1;
MyDBComboBox.DataField = Materiel; 
Table1.Open;


vérifie si la base est ouverte...

cantador

sharifcrd · Answer

sharif
j'ai tout essaiyer  pas a pas mais j'obtien rien
les liste sont vide
sauf MyDBComboBox affiche une seule valeur

cs_cantador · Answer

sauf MyDBComboBox affiche une seule valeur

bon, il y a déjà 
du mieux..
vérifie ton enregistrement "Materiel" et 
les autres propriétés des deux composants
et lis les docs car ce sont deux composants qui 
normalement sont utilisés pour afficher des listes de valeurs.

Je ne sais pas exactement ce que tu souhaites faire :

afficher un enregistrement particulier
ou
afficher l'ensemble des enregistrements de la table

si c'est la deuxième formule, tu vois tout de suite qu'il faut faire autrement..


cantador

pierrotk10d · Answer

Bonjour,
Si tu veux des agents dans le TDBComboBox il faut y mettre les valeurs contenues dans le champs 'Agent' et non le champ 'Materiel'
Lire l'aide en ligne de Delphi pour TDBListBox et TDBComboBox. Tout est expliqué.
Definir DataField pour spécifier quel champ est representé dans la boite liste
Les valeurs de la liste doivent etre chargées manuellement en utilisant la propriété ITEMS
Et la syntaxe pour DataField est : DBListBox1.DataField := 'Materiel' et non
DBListBox1.DataField = Materiel  
Memes remarques pour le TDBComboBox
Il faut aussi que les champs contiennent des valeurs.
Suivant ce que tu veux faire il existe TDBLookupUpListBox et TDBLookupComboBox.   
Ci dessous petite procédure pour charger les items à la création de la fiche

procedure TForm1.FormCreate(Sender: TObject);
begin
  With Table1 do begin
    Open;  // Ou active = True
    First;
    While not eof do begin
      DBListBox1.Items.Add(Table1.FieldByName('Materiel').AsString);
      DBComboBox1.Items.Add(Table1.FieldByName('Agent').AsString);
      Next;
    end;
    First;
  end;
end;

pierrot

sharifcrd · Answer

sharif
je te remerci infiniment
moi j'ai deja travailler avec TDBLookupUpListBox et TDBLookupComboBox il font l'affair automatiquement mais il ne sont pas riche en proprites et evenement comme DBLISTBOX et DBCOMBOBOX
c a dir je me suis familiarisé avec DBLISTBOX et DBCOMBOBOX.
mais comme la construction des list dans DBLISTBOX et DBCOMBOBOX est manuelle je prefere travailler avec TDBLookupUpListBox et TDBLookupComboBox pour eviter d'ecrire des codes qui peuvent influer sur la rapidite du programme.
merci de nouveau
cordialement .............

pierrotk10d · Answer

Bonjour,
Ta réponse me semble bien ambigue. Tu savais qu'il fallait remplir manuellement les listes d'items mais tu poses une question. Pourquoi mes listes sont elles vides???
Alors pourquoi poser la question quand on connait la réponse?
Salutations


pierrot

DBLISTBOX et DBCOMBOBOX sur delphi

6 réponses

Votre réponse

Discussions similaires