Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

Как определить позицию чужого окна БЕЗ РАМКИ (рабочую область)?   Найти похожие ветки 

 
kalexi   (2010-01-25 20:17) [0]

Сабж. Т.е допустим

GetWindowRect(hWindow, r);

дает позицию 100;100 (top;left). Тогда GetPixel(DC, top, left) определит цвет не рабочей области формы а Border"а. Кам можно определить положение рабочей области формы?


 
kalexi   (2010-01-25 20:43) [1]

GetClientRect - top и left = 0


 
Игорь Шевченко ©   (2010-01-25 22:49) [2]


> GetClientRect - top и left = 0


Было бы странно обратное.

procedure TForm1.Button1Click(Sender: TObject);
var
 Rect: TRect;
 WinRect: TRect;
begin
 Rect := ClientRect;
 GetWindowRect (Handle, WinRect);
 MapWindowPoints(Handle, HWND_DESKTOP, Rect, 2);
 OffsetRect(Rect, -WinRect.Left, -WinRect.Top);
 ShowRect(Rect);
end;


 
Игорь Шевченко ©   (2010-01-26 02:24) [3]

Плохо прочитал вопрос.

Для того, чтобы найти абсолютные координаты клиентской части окна hWnd по его известному ClientRect (0-0, clientwidth-clientheight), достаточно одного вызова MapWindowPoints (hWnd, HWND_DESKTOP, ClientRect, 2);



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.057 c
2-1338620541
novichek
2012-06-02 11:02
2013.03.22
FireMonkey - Binding


2-1330463360
Михалыч
2012-02-29 01:09
2013.03.22
Сетевая Бд на MySql


15-1346349689
alexdn
2012-08-30 22:01
2013.03.22
Теория чисел


15-1352320203
Юрий
2012-11-08 00:30
2013.03.22
С днем рождения ! 8 ноября 2012 четверг


2-1338103675
Pcrepair
2012-05-27 11:27
2013.03.22
Application.ProcessMessages и загрузка процессора