00 Voix

Delphi/Lazarus: Récupérer la position X/Y d'un contrôle par rapport à l'écran

Conseil de Delphiain | 09/05/2020 à 23:42

Aujourd'hui, je voudrais vous montrer comment obtenir les coordonnées X / Y d'un contrôle par rapport aux coordonnées de l'écran (et non au système de coordonnées du formulaire). 

Dans l'exemple, nous récupérons la position d'un TPanel nommé Panel1, mais vous pouvez également utiliser n'importe quel autre contrôle:

var
  P: TPoint;
begin
  P:=Panel1.ClientToScreen(Point(0,0));
  Form1.Caption:=inttostr(P.X)+' '+inttostr(P.Y));
end;

Cela récupère la position supérieure gauche du panneau par rapport à l'écran et écrit la position dans le titre de Form1.

RépondrePositifNégatif

Sur l’Auteur

AvatarL’auteur n’a pas encore ajouté de brève description de profil.
Voir Profil

 

Sujets Connexes

Avis Important

Veuillez noter: Les contributions publiées sur askingbox.com sont des contributions d’utilisateurs et ne doivent pas remplacer les conseils d’un professionnel. Ils ne sont pas vérifiés par des indépendants et ne reflètent pas nécessairement l’opinion de askingbox.com. Apprendre encore plus.

Participer

Posez votre propre question ou écrivez votre propre article sur askingbox.com. Voici comment.