Bonjour à tous,
Y a t-il moyen d'avoir les dimensions d'une cellule d'un StringGrid lorsqu'on la survole avec la souris (OnMouveMove) ?
Je sais avoir la position de la souris au survol de la cellule, mais les dimensions ...
Merci pour les tuyaux!
Bonjour à tous,
Y a t-il moyen d'avoir les dimensions d'une cellule d'un StringGrid lorsqu'on la survole avec la souris (OnMouveMove) ?
Je sais avoir la position de la souris au survol de la cellule, mais les dimensions ...
Merci pour les tuyaux!
Delphi 10.4.1 - Lazarus
Utilisation de la VCL
Bonjour,
au débotté, je dirais qu'il faut utiliser CellRect
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); var ACellRect : TRect; c,r : Integer; begin with TStringGrid(Sender) do begin // obtenir la cellule MouseToCell(X,Y,C,R); // obtenir le rectangle ACellRect:=CellRect(Col,Row); LabelTaille.Caption:=Format('Largeur %d Hauteur %d' ,[ACellRect.width, ACellRect.height]); // non testé
MVP Embarcadero
Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
SGBD : Firebird 2.5, 3, SQLite
générateurs États : FastReport, Rave, QuickReport
OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd
Impeccable SergioMaster,
Simple et efficace, je n'avais pas pensé au CellRect
Merci pour la réponse, c'est résolu!
Delphi 10.4.1 - Lazarus
Utilisation de la VCL
Merci beaucoup SergioMaster, Ça m'a beaucoup aidé !
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager