ComboBox associer une valeur à une ligne

Résolu
dimdidi Messages postés 26 Date d'inscription mercredi 20 juillet 2005 Statut Membre Dernière intervention 18 juillet 2006 - 28 nov. 2005 à 09:52
cs_gilou33 Messages postés 15 Date d'inscription vendredi 7 novembre 2003 Statut Membre Dernière intervention 29 février 2008 - 17 févr. 2006 à 18:35
Bonjour,

Je voudrais dans une ComboBox pouvoir associé une valeur en fonction de la ligne selectionnée
ex :
Base de donnee
ID -> Valeur
5 -> Toto
10 -> Tata
12 -> Tutu

dans la ComboBox
ComboBox1.Items.Insert(0,'Toto');
ComboBox1.Items.Insert(1,'Tata');
ComboBox1.Items.Insert(2,'Tutu');

Quand je sélectionne "Tata" je voudrais récuperer la valeur "10"

En comparaison, ce que cela ferais en HTML
<select>
<option value='5'>Toto</option>
<option value='10'>Tata</option>
<option value='12'>Tutu</option>
</select>

Si vous avez des idées ...

J'ai essayer avec ComboBox1.Items.InsertObject

Merci d'avance


Dimdidi
A voir également:

14 réponses

Cirec Messages postés 3833 Date d'inscription vendredi 23 juillet 2004 Statut Modérateur Dernière intervention 18 septembre 2022 50
28 nov. 2005 à 16:24
Essaye ceci j'ai testé et ca fonctionne

Pour écrir:
procedure TForm1.Button2Click(Sender: TObject);
Function AddObject(s: String):TObject;
Begin
Result := TObject(LongInt(s));
End;
begin
Combobox1.AddItem('Toto',AddObject('DelphiFr c''est Cool'));
end;


Pour lire:
procedure TForm1.Button3Click(Sender: TObject);
begin
ShowMessage(String(Combobox1.items.objects[Combobox1.itemindex]));
end;