[WD10]Récupérer les coordonnées X,Y d'une ligne de table

Version imprimable

19/03/2007, 17h13
Louis Griffont

[WD10]Récupérer les coordonnées X,Y d'une ligne de table

Bonjour,

J'aimerais ouvrir une petite fenêtre juste sous la ligne en cours d'une table mémoire.

Comment faire pour connaitre la position X,Y (surtout Y 8-) ) de la ligne en cours ?
19/03/2007, 17h14
babyboy

TableSelectOccurence renvoie la bonne info me semble-t-il ... ;)
19/03/2007, 17h29
Louis Griffont

Je me suis mal exprimé semble-t-il. Je ne veux pas le n° de la ligne sélectionnée, (ça je l'ai par TableSelectPlus ou TableSelectOccurrence, comme tu me l'as dit), non ce que je veux c'est l'ordonnée en pixel de la ligne, pour pouvoir positionner ma fenêtre, juste sous la ligne en question !
20/03/2007, 11h01
babyboy

Tu peux éventuellement récuperer les coordonnées X,Y du pointeur de la souris et faire en fonction du clic souris non ? :P
20/03/2007, 11h42
Louis Griffont

Hélas, non !

Puisque l'ouverture de la fenêtre est obtenue par le clic sur un bouton :?
20/03/2007, 11h47
babyboy

Dans ce cas ...

Tu peux peut etre tenter un truc style :
MaTable[1,1]..X (ou PosX je sais plus) ou encore :
{MaTable[1,1]}..X

ça donne quoi ça ?

J'avais un bout de code du ST WD pour ça ;)
(à adapter bien entendu, mais ça devrait t'aider)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Visualiser le contenu des cellules lors du survol de la table
nligne est une chaîne
sCol est une chaîne
x est un entier
y est un entier
 
// sélection sur la table TABLE
x = PoidsFaible(CurseurPos())
y = PoidsFort(CurseurPos())
nligne = TableInfoXY(Table, tiNumLigne + tiOrigineEcran, x, y)
sCol = TableInfoXY(Table, tiNomColonne + tiOrigineEcran, x, y)
 
SI sCol<>"" ET nligne<>"" ALORS
	{sCol}..Bulle={sCol}[nligne]
FIN

20/03/2007, 13h30
Louis Griffont

Citation:

Envoyé par Yann09

Dans ce cas ...

Tu peux peut etre tenter un truc style :
MaTable[1,1]..X (ou PosX je sais plus) ou encore :
{MaTable[1,1]}..X

ça donne quoi ça ?

Ca ne passe pas à la compile :aie:

Citation:

Envoyé par Windev10

Erreur :La propriété 'X' n'existe pas sur ce type de champ.

Guardian >> Merci, mais ta fonction est basée sur le curseur souris, et moi je ne peux pas utiliser ce curseur !:roll:

Voila, j'ai trouvé.

J'ai fait une procédure...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
// Résumé : <Calcul l'ordonnée de la ligne en pixel par rapport au Coin haut gauche de la fenêtre>
// Syntaxe :
//[ <Résultat> = ] FGetPosYLigne (<cpTable> est chaîne, <npLigne> est entier)
//
// Paramètres :
//	cpTable (chaîne) : <indiquez ici le rôle de cpTable>
//	npLigne (entier) : <indiquez ici le rôle de npLigne>
// Valeur de retour :
// 	entier : Ligne (en pixel) se situant sous la ligne en cours
//
// Notes :
// Le résultat est donnée par rapport à la fenêtre.
// 
//
PROCEDURE FGetPosYLigne( cpTable est une chaîne, npLigne est un entier)
LOCAL
	nlRetour			est un entier
	nlHauteurTitre	est un entier
	nlHauteurLigne	est un entier
	nlNbLignes		est un entier
	nlHauteurTable	est un entier
 
nlHauteurTable = { cpTable,indChamp}..Hauteur
nlHauteurLigne = { cpTable,indChamp}..HauteurLigne
 
nlNbLignes = TableOccurrence( cpTable, toVisible)
nlHauteurTitre = nlHauteurTable - ( nlNbLignes * nlHauteurLigne)
 
nlRetour = { cpTable,indChamp}..Y + nlHauteurTitre + ( npLigne * nlHauteurLigne)
RENVOYER( nlRetour)

Pour obtenir l'indice de la ligne, j'utilise IndiceEnCours()
et j'ai du mettre le bouton en type Interruption

Voila, si ça peut servir à quelqu'un ! ;)

J'ai un truc pas mal (ta procédure ne fonctionne pas avec moi, ça se décale à chaque ligne), mais ça ne fonctionne que si on est en saisie dans le champ de la colonne...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
rect est composé de
	l est un entier long // left
	t est un entier long // top
	r est un entier long // right
	b est un entier long // bottom
FIN
point est composé de 
	x est un entier long
	y est un entier long
FIN
// On chope la position du champ
AppelDLL32("user32","GetWindowRect",Handle("macolonne"),&rect)
point.x = rect.l
point.y = rect.t
// On convertie en position client (intérieur de la fenêtre)
AppelDLL32("user32","ScreenToClient",Handle(),&point)
// Voilà, on a tout dans la variable "point"

27/03/2007, 08h42
Louis Griffont

Le probleme c'est que je ne suis pas en saisie !

Et pour moi, ma fonction marche correctement, alors... :yaisse2: