Wednesday, March 2, 2011

What's the name of the Window at x,y?

If you have a need to find out the name of the parent window of a window or control at a given X and Y position, you maybe able to use the following "GetParentWindowNameAt()" function:

function GetParentWindowNameAt
         ( X, Y : integer ) : string;
  P : TPoint;
  W : TWinControl;
  P.X := X;
  P.Y := Y;

  W := FindVCLWindow( P );
  if( nil <> W )then
    Result := W.Name;
  end else
    Result := '';
Listing #1 : Delphi code. Download winname (0.3 KB).
For example, to get the name of the parent (bottom most window) at (250,300) to a string variable named "strName"
strName :=
  GetParentWindowNameAt( 250, 300 );
Listing #2 : Delphi code. Download demo1 (0.17 KB).

Twitter Delicious Facebook Digg Stumbleupon Favorites More

Design by Kang Iwan K-sev | Thank's for your visit To My Site - Ridwan Mulyana | Cibeureum