Discussion :

[moustaf_26]

salut, je voudrais alimenter un dbcombobox par programmation, je suppose que les 3 parametres ci apres sont les essentiels à fournir: le listsource, le listfield et le keyfield

Code :

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

1
2
3
4
5
 
moduledonnees.test.SQL.Add('requete');
DBLookupComboBox1.ListSource.DataSet:=moduledonnees.sotest.DataSet;
dblookupcombobox1.ListField:=moduledonnees.sotest.DataSet.FieldByName('LISTE_INDICATEUR.NOM_INDICATEUR').AsString;
dblookupcombobox1.KeyField:=moduledonnees.sotest.DataSet.FieldByName('LISTE_INDICATEUR.ID_INDICATEUR').AsString;

mais il me renvoi un message d'exeception, en fichier joint
je sais pas ou peut se trouvé l'erreur

[Ph. B.]

Bonjour,

je voudrais alimenter un dbcombobox

C'est un TDBLookupComboBox, ce qui n'est pas la même chose...
Voir la FAQ !

il me renvoi un message d'exception

Violation d'accès, un de tes objets doit être indéfini (=nil), peut-être moduledonnees.sotest.DataSet. A vérifier en traçant pas à pas et contrôlant les variables ou propriétés...
--
Philippe.

[moustaf_26]

merci PH.b, excus j'ai mal ecrit sinon mon composant est bien un dblookupcombobox, j'ai vu la fac aussi, mais je voudrai savoir dans mon code, ou se trouve le probleme? je voudrais savoir si c'est les bonnes et suffisantes instructions qu'il faut(utilisation des proprietés du composant).
concernant le 'nil' comme au debut j'ai alimenté mon tsqlquery,
mon dblookupcombobox prend le dataset d'un datasource,
ma question faudrait -t-il lier mon composant datasource à mon tsqlquery? si oui , comment? merci

[ShaiLeTroll]

'LISTE_INDICATEUR.ID_INDICATEUR' c'est possible comme nom de champ ?
Je trouve cela étrange, LISTE_INDICATEUR est la table, et ID_INDICATEUR est le nom du champ !
Parcontre, je crois que FieldByName provoque DatabaseError si le champ n'existe pas !
Comme tu as une EAccessViolation et non une EDatabaseError, c'est que l'erreur est avant FieldByName
On voit que tu affecte ListSource.DataSet, c'est étrange !

Est ce que DBLookupComboBox1.ListSource et moduledonnees.sotest.DataSet ont été instanciés ?
Pour le TDBLookupComboBox, il faut DEUX DataSet donc DEUX DataSource un pour le contenu du champ, un second pour la liste de valeurs !

Ensuite, on se demande même si tu comprends ce que tu fais et si tu as lu l'aide du TDBLookupComboBox
Ton code écrit des valeurs dans des propriétés attendant des noms de champs, cela n'a juste aucune cohérence et montre que tu n'as strictement rien compris à ce que tu as lu dans la FAQ !
tu ne mesure pas l'importance des DFM et le Système de Flux qui apporte une instanciation implicite des Objets
Si tu veux le faire par code, tu dois faire une instanciation explicite :

Code :

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

1
2
3
4
5
 
DBLookupComboBox1.ListSource := TDataSource.Create(DBLookupComboBox1);
DBLookupComboBox1.ListSource.DataSet := moduledonnees.sotest.DataSet;
dblookupcombobox1.ListField:= 'NOM_INDICATEUR';
dblookupcombobox1.KeyField:= 'ID_INDICATEUR';

Tu n'avais même pas UNE seule ligne de correct ! Merci de ne pas bricoler et d'inventer n'importe quoi !

[moustaf_26]

merci, c'est en forgeant qu'on devient forgeron, j'ai pas une grande connaissance en delphi, pour DBLookupComboBox1.ListSource et moduledonnees.sotest.DataSet , c'est des composants que j'ai crée en mode conception, donc je pensais que je ne drevrai pas instancier encore.
mais je rencontre un probleme encore je veux en fait remplir mon dataset dynamiquement avec du sql parametré,
le probleme c'est que en mettant

Code :

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

1
2
3
 
montsqlquery.sql.add(requte);
montsqlquery.active:= true;

ça m'indique un message d'erreur(database error sql ne se termine pas correctement) pourtant si je met la meme requete dans le composant visuel tsqlquery, ça passe, je voudrais passer des requetes parametré.
une fois merci encore

[ShaiLeTroll]

merci, c'est en forgeant qu'on devient forgeron, j'ai pas une grande connaissance en delphi, pour DBLookupComboBox1.ListSource et moduledonnees.sotest.DataSet , c'est des composants que j'ai crée en mode conception, donc je pensais que je ne drevrai pas instancier encore.

Pour moduledonnees.sotest.DataSet, on peut penser que l'object est correctement instancié
Pour DBLookupComboBox1, c'est bon aussi
Mais pour DBLookupComboBox1.ListSource, c'est une propriété à nil par défaut, c'est au programmeur de lui affecter un objet, elle fonctionne exactement comme la propriété DataSource
soit tu poses un objet TDataSource via l'IDE et tu l'attache
soit tu l'instancies manuellement puis tu l'affecte

Pour ton erreur SQL, tu ne fournis pas le SQL et tu ne fournis pas la mise en place des paramètres, difficile de t'aider, on a pas de boule de cristal pour deviner les erreurs