Discussion :

[aguina]

salut j'ai actuellement un soucis face à mon projet sous Delphi.
en fait je voudrais connaitre s'il existe un controle intégré à delphi qui permet d'associer plusieurs colonne à un Items d'un combobox. ceci pour la gestion des tables Père/Fils ou j'affiche le libelé et je cache le code de l'enregistrement.
merci de votre aide

[Lung]

Moi, pour faire ça, j'ai refait un composants héritant de la TComboBox, dans laquelle je rajoute une TStringList, que je dessine (ou pas) dans le OnDraw.

[popo]

Moi, pour faire ça, j'ai refait un composants héritant de la TComboBox, dans laquelle je rajoute une TStringList, que je dessine (ou pas) dans le OnDraw.

Je pense qu'il est inutile d'en arriver à programmer un nouveau composant. Je ne sais pas comment tu as fait ton compo mais je suppose que lorsque tu fait une opération genre un tri, tu trie également à la mano la StringList pour que les données restent cohérentes. Idem pour l'ajout ou le retrait d'un item.

Puisque Agina ne veux pas afficher la deuxième colonne, autant créer une StringList extérieur pour le faire, ça sera moins compliquer que de créer un composant

[aguina]

merci de votre prompte réaction. mais je crois que pour un débutant, la solution de POPO pourrais me convenir. reste seulement à trouver un bon tutos pour la mise en oeuvre. Mais à tout azard quels sont les caractéristiques des controles DBCombobox et TDBLOOKUPcombobox ne peuvent ils pas ressoudre le problème?
merci

[Just-Soft]

oui bien sûr, le DBComboBox permet d'afficher plusieurs colonnes. Regardes en l'aide de Delphi c'est détaillé.

[aguina]

j'ai exploré le controle Tstringlist mais j'avoue que c'est pas vraiment ce que je cherche bref si j'ai bien regardé ca ne resoud pas mon problème. et pour ce qui est du DBCombobox j'arrive pas à le charger malgrés l'aide de DELPHI pouvez -vous me guider

[popo]

j'ai exploré le controle Tstringlist mais j'avoue que c'est pas vraiment ce que je cherche bref si j'ai bien regardé ca ne resoud pas mon problème. et pour ce qui est du DBCombobox j'arrive pas à le charger malgrés l'aide de DELPHI pouvez -vous me guider

Le controle TStringList ? Je suppose que tu veux parler de l'Objet TStringList

En fait la manoeuvre est assez simple.
Supposons que tu veuille supprimer un enregistrement de ta liste.
1) Tu récupère l'index de l'item dans la liste
2) Tu retire l'item de la liste
3) Tu retire l'item de la StringList grâce à l'index

Tu peux mêmre supprimer un enregistrement avec son contenu de la manière suivante (l'aide de Delphi est très bien faite)

Code :

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

1
2
3
4
5
6
with ListBox1.Items do
begin
  BIndex := IndexOf('bureaucratie');  
  if BIndex > -1 then 
   Delete(BIndex);
end;

De plus toute sorte de manipulations sont déjà implémentée dans le TStringList, comme le tri ou le déplacement.
Encore plus fort tu peux associer un objet à chaque élément de ta StringList via la propriété Objects.

Je persiste à croire que la StringList est ce qu'il te faut

[aguina]

Merci déjà pour votre attention.
En fait tient d’abord à repréciser mon problème. En fait, je gérer des enregistrements père/fils (Région / département). Donc dans mon formulaire de département je veux charger dans un Combobox le code et le libellé du département pour à l’enregistrement sauvegarder le code de la région. Ce serait aisé en l’état actuel de charger les combobox avec le code de la région mais ce sont des entiers donc insignifiant pour l’utilisateur par rapport aux libellés.La solution à ce problème pour moi c’est un Combobox pouvant afficher plusieurs colonnes.

Je le faisais déjà avec VB6 avec la DLL FM20.dll de Microsoft Forms 2.0 Object Library comment pourrais-je importer cela dans delphi 7.

[popo]

j'affiche le libelé et je cache le code de l'enregistrement

La solution à ce problème pour moi c’est un Combobox pouvant afficher plusieurs colonnes

Faudrait savoir si tu veux l'afficher ou le masquer !

Après si tu veux afficher code et le nom du département il suffit de les combiner dans la combo box et de laisser juste le code dans la stringList

Code :

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

MaListBoxDepartement.items.add('(01) Ain')

et

Code :

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

MaStringListDepartement.items.add('01')

Ou encore tu peux associer l'item à un élément de la stringList

Code :

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

MaStringListDepartement.items.addObject('01',MaListBoxDepartement.items[0])

[aguina]

tout d'abord je tient à recadrer le PB je veux afficher le libellé tout en cachant le code et par la suite manipuler le code qui est l'identifiant/clé primaire. la solution stringlist 'cest bien mais pas optimal. car imaginez vous je dois éffectuer des simulations sur une table de près de 30 000 enregistrements(au bas mot) charger à la fois le combobox et la stringlist le temps d'attente!
une autre solution aurait été de synchroniser 2 comboboxs (code et libellé) ou de concatener les champs mais c'est c'est cette gymnastique que je veux éviter.

[Jeankiki]

Salut,

En fait tu veux pouvoir afficher certaines infos et enregistrer un code lié à cette info:
Ex:
Avec une base de donnée de pays, dans laquelle tu aurais un champ PAYS et un champ CODE et tu voudrais afficher à l'utilisateur le pays mais quand tu enregistres c'est le code qui lui est attaché qui doit être enregistré, enfin si j'ai bien compris

Pq ne pas utiliser une DBLookupComboBox, tu remplis dans ListField les champs que tu veux afficher séparé par un ; et dans KeyField le champ que tu vas utiliser pour enregistrer la valeur attaché au Pays

[Just-Soft]

oui tout à fais ça un DBLookUpCompboBox, c'est la solution idéale à ton problème.

[aguina]

merci pour cette intervention
en fait j'ai exploré cette solution mais je suis bloqué au niveau du chargement du DBLOOKUPcombobox malgrés tous les explications du FAQ delphi.
- Je connecte mon objet ADOdataset1 à ma source de données je paramàtre
- Dans le DBLOOKUPcombobox il n'ya pas d'element dans la liste DATAsource ou Listsource
- j'ajoute un composant DATAsource1 ou dataset = datasource1
- dans DBLOOCKUPcombobox
Datasource = datasource1
Listsource = datasource1
listField = champ1
keyfield = champ2
datafield = champ1
mais à l'execution le composant reste vide et inactif

me suis je bien pris??