Discussion :

[gamez]

bonjour

j'ai un Tpagecontrol avec 2 onglets
j'ai crée une Tlistbox1 dans le Tabsheet1 et une Tlistbox2 dans le Tabsheet2

mes listbox sont préremplies.

comment faire pour récupérer le 2e élément (par exemple) de la Tlistbox du Tabsheet actif lorsque je clic sur un bouton?

merci

[gamez]

j'ai oublié de préciser:

evidement je ne cherche pas des solutions du type if...then...
en mettant que si c'est le 1er onglet qui est actif alors je lis la 2e valeur du tlistbox1, que si c'est le 2e onglet qui est actif alors je lis la 2e valeur du tlistbox2 parce que je serai prisonnier du côté non automatique et si j'ajoute 100 onglets je serai obligé de faire 100 conditions...

voilà

[gamez]

en fait ce qui me gene c'est qu'on a besoin des noms des listbox pour pouvoir y accéder.
mais on ne sait pas à l'avance de quelle listbox on à affaire donc on ne peux pas l'écrire en dur dans le programme.
je ne sais pas si je suis assez clair en fait.

[Montor]

listbox.item[active tab sheet index] a mediter

[gamez]

ca aurait été bien que ce soit si facile^^
désolé mais ca n'a pas marché... c'était prévisible.

"listbox" n'est pas accépté
le débuggeur dit "identificateur non déclaré."

c'est justement le problème que je disais
en fait ce qui me gene c'est qu'on a besoin des noms des listbox (au moment d'écrire le code) pour pouvoir y accéder.

[Andnotor]

evidement je ne cherche pas des solutions du type if...then...

Pourtant c'est obligatoire si t veux récupérer un objet (quelconque) Delphi . Le code sera ainsi:

Code :

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

1
2
3
4
5
6
7
with PageControl1.ActivePage do
  for i := 0 to ControlCount -1 do
    if Controls[i] is TListBox then
    begin
      MyVar := TListBox(Controls[i]).Items[1];
      Break;
    end;

Si la ListBox detient la focalisation, tu pourrais faire ceci:

Code :

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

1
2
  if ActiveControl is TListBox then
    MyVar := TListBox(ActiveControl).Items[1];

Et s'il s'agit de récupérer uniquement le handle du contrôle (appel à une API), tu peux aussi utiliser GetGUIThreadInfo.

[gamez]

ta solution marche impec.
il y'a des trucs que je ne connaissais pas dedans.
c'est pas à cette utilisation du if..then que je pensais, celle que tu proposes convient parfaitement

merci