Discussion :

[paradise]

Salut,
Je récupère les coordonnées écran d'un bouton avec ClientToScreen mais ces coordonnées sont inexactes ! Par ex Y = 331 alors qu'il devrait être de 450 environ...
Mon bouton est placé sur un TGroupBox, contenu dans un TPageControl lui meme dans un autre TPageControl.
Quelqu'un a une idée ?
Merci

[butch]

Bonjour.
Tu n'as pas mis d'exemple de code.Alors je suppose simplement .Peut être n'as tu pas appliqué la fonction clientToScreen au bon objet.
Voici un exemple de code qui fonctionne en reprenant ton exemple d'imbrication de composants.

Code :

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

1
2
3
4
5
var
p:TPoint;
begin
 p:=point(Button1.Left,Button1.Top);
 p:=GroupBox1.ClientToScreen(P);

[paradise]

Cool ça marche !
En fait je faisais :

Code :

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

1
2
3
4
var
  p: TPoint;
begin
  p := ClientToScreen(Point(Button1.Left, Button1.Top));

...ce qui fait que la méthode ClientToScreen appelée était celle de ma fiche et pas celle du GroupBox.
Merci pour ton aide !

[anapurna]

salut


mettre le tag RESOLU merci

@+ Phil

[sjrd]

Pourquoi faire simple quand on peut faire compliqué, n'est-ce pas ?
Il suffit de faire :

Code :

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

Button1.ClientToScreen(Point(0, 0))

Ca règle tous ces problèmes