|
Как узнать, была ли перемещена форма
Как узнать, была ли перемещена форма
(...)
Type TfrmMain = Class( TForm ) Private Procedure OnMove( Var Msg : TWMMove ); Message WM_MOVE; End;
(...)
Procedure TfrmMain.OnMove( Var Msg : TWMMove ); Begin Inherited; (...) End;
(...) |
Категория: Примеры на Delphi7 | Добавил: DelphiAiX (28.07.2011)
|
Просмотров: 657
| Рейтинг: 0.0/0 |
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ]
|
|