Indice d'une colonne d'un TListView [Résolu]

Signaler
Messages postés
93
Date d'inscription
mardi 15 mars 2005
Statut
Membre
Dernière intervention
2 juillet 2007
-
Messages postés
702
Date d'inscription
vendredi 21 mars 2003
Statut
Membre
Dernière intervention
1 octobre 2009
-
salut tout le monde,

je voudrais savoir comment on peut récupérer l'index de la colonne dans laquelle on a cliqué dans un TListView. En fait j'ai trouvé seulement si on clique sur l'entête de la colonne; mais si le clic se passe sur une ligne du tableau je n'y arrive pas.

Et il faudrait aussi que ça marche quand le tableau à une ScrollBar horizontale...

merci si vous cherchez, énorme merci si vous répondez


<HR>
BLOU BLOU POWAA

4 réponses

Messages postés
702
Date d'inscription
vendredi 21 mars 2003
Statut
Membre
Dernière intervention
1 octobre 2009
4
Salut,



En voilà un vrai problème à la c.. ! J'avais résolu comme suit (sytle = vsReport):





procedure TForm1.ListView1MouseDown(Sender: TObject; Button: TMouseButton;

Shift: TShiftState; X, Y: Integer);

var

Colonne, Ligne,
HScroll,

j
: Integer;

begin

HScroll := GetScrollPos(ListView1.Handle, SB_HORZ);


Ligne
:= ListView1.GetItemAt(X, Y).Index;


Colonne
:= -1;

j := X + HScroll; // position X "réelle" dans le tableau

repeat

inc(
Colonne
);

j := j - ListView1.Columns[i].Width;

until j < 0;

Case Colonne of

......

end;




HScroll :=
GetScrollPos(ListView1.Handle, SB_HORZ);

est d'ailleurs le réponse à ta deuxième question.




Ken@vo


<hr size="2" width="100%">
Code, Code, Codec !



http://www.pourflorenceethussein.org/
Messages postés
93
Date d'inscription
mardi 15 mars 2005
Statut
Membre
Dernière intervention
2 juillet 2007

ou si vous arrivez à récupérer de combien le tableau à était scrollé vers la droite ça me va aussi... ;)


<HR>
BLOU BLOU POWAA
Messages postés
93
Date d'inscription
mardi 15 mars 2005
Statut
Membre
Dernière intervention
2 juillet 2007

un grand merci à toi Kenavo


KENAVO, KENAVO
Puisque mon gros bateau va m'emporter bientôt
KENAVO


KENAVO, KENAVO
Dans un dernier sanglot quittons nous sur ce mot
KENAVO


<HR>
BLOU BLOU POWAA
Messages postés
702
Date d'inscription
vendredi 21 mars 2003
Statut
Membre
Dernière intervention
1 octobre 2009
4
Gast ! J'entends les binious !



Ken@vo


<hr size="2" width="100%">
Code, Code, Codec !

http://www.pourflorenceethussein.org/