Текущая позиция окна

Written on 22 Октября 2007. Posted in [Delphi] Пользовательский интерфейс. Окна и формы

Текущую позицию можно получить от холста, используя Windows API функцию GetCurrentPosition:

CurrentX := LoWord( GetCurrentPosition( Canvas.Handle ) ) ;

CurrentY := HiWord( GetCurrentPosition( Canvas.Handle ) ) ;