Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TopLeft ClientRect [D6, XP]


webpauk ©   (2008-02-19 10:37:00) 

ClientRect определен как Rect(0, 0, ClientWidth, ClientHeight)
а как определить положение самого ClientRect относительно Form.Left, Form.Top.
Как я понимаю это зависит от GetSystemMetrics(SM_CXBORDER, SM_CYBORDER, SM_CYCAPTION...)


webpauk   (2008-02-19 10:55:00) [1]


> Сергей М. ©   (19.02.08 10:50) [1]

вот так вроде:

 A:=ClientOrigin;
 A.X:=A.X-Left;
 A.Y:=A.Y-Top;


webpauk   (2008-02-19 10:55:00) [2]


> Сергей М. ©   (19.02.08 10:50) [1]

спасибо. навел на мысль


Сергей М.   (2008-02-19 10:50:00) [3]

С пом. Form.ClientToScreen() получаешь абс. экранные координаты левого верхнего угла кл.области окна формы и вычитаешь из них сооответствующие Form.Left, Form.Top.


Наверх

Титульная страница Поиск, карта сайта Написать письмо