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

Question

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

Signaler

BlouMan

Messages postés: 93
Date d'inscription: mardi 15 mars 2005
Statut: Membre
Dernière intervention: 2 juillet 2007

- 18 avril 2005 à 15:31
cs_Kenavo

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

- 19 avril 2005 à 11:36

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

A voir également:

Delphi tlistview
Index de colonne non valide - Meilleures réponses
Tlistview delphi - Meilleures réponses
Imprimer un Listview ✓ - Forum - Delphi / Pascal
Remplir ListView ✓ - Forum - Delphi / Pascal
Comparer recuperer Items Tlistview ✓ - Forum - Delphi / Pascal
Comment faire pour sauvegarder les données du TListView. - Forum - Delphi / Pascal
Delphi / Pascal : Mettre des cellules en couleurs dans un tlistview (style= vsreport) - CodeS Source - Guide

4 réponses

Réponse 2 / 4

BlouMan

Messages postés: 93
Date d'inscription: mardi 15 mars 2005
Statut: Membre
Dernière intervention: 2 juillet 2007

18 avril 2005 à 17:22

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

<HR>
BLOU BLOU POWAA

Réponse 3 / 4

BlouMan

Messages postés: 93
Date d'inscription: mardi 15 mars 2005
Statut: Membre
Dernière intervention: 2 juillet 2007

19 avril 2005 à 09:39

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

Réponse 4 / 4

cs_Kenavo

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

4
19 avril 2005 à 11:36

Gast ! J'entends les binious !

Ken@vo

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

http://www.pourflorenceethussein.org/

Répondre Posez votre question

cs_Kenavo · Accepted Answer · 2005-04-19T09:00:08+0200

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/

Votre réponse