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

Вниз

Определиние координат   Найти похожие ветки 

 
Батя   (2006-07-22 05:17) [0]

Мне нужно определить координаты любого другого окна, т.е. (х;y)(ширинa;длина)


 
Юрий Зотов ©   (2006-07-22 05:39) [1]

Нет проблем. Вот координаты любого другого окна: 12, 15, 100, 200.

Если этот результат не устраивает, то сообщите, что известно о нужном окне. Например, известен его хэндл. Или известно, что над ним находится мышь. Или известно, что оно активно. Или еще что-то.

Потому что если о нем ничего не известно, то, видимо, нельзя найти то, не знаю что?


 
Батя   (2006-07-22 06:01) [2]


> Потому что если о нем ничего не известно, то, видимо, нельзя
> найти то, не знаю что?

У меня есть индификатор окна и класс, к которому он пренадлежит, этого достаточно


 
Fay ©   (2006-07-22 06:33) [3]

2 Батя   (22.07.06 6:01) [2]
> индификатор окна
Это хто?


 
Батя   (2006-07-22 07:18) [4]


> Это хто?


>  индификатор окна

Ладно а по классу можно определить


 
KilkennyCat ©   (2006-07-22 08:10) [5]

Вот даже если тупо загнать в яндекс "координаты любого другого окна delphi" можно получить достаточно информации.

Извините, но создается впечатление, что самостоятельно Вы совершенно ничего не хотите сделать.

http://doc.mpv.ru/steps/mfc/winapi/72.html


 
Handle   (2006-07-23 13:35) [6]

procedure TForm1.Timer1Timer(Sender: TObject);
var
 ARect:      TRect;
begin
GetWindowRect(WindowFromPoint(Mouse.CursorPos),ARect);
Caption:= "Width: " + IntToStr(ARect.Right - ARect.Left) + ", Height: " + IntToStr(ARect.Bottom - ARect.Top)
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Interval:= 1;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.056 c
3-1159323045
Alex_AA
2006-09-27 06:10
2006.12.03
Проблема с отчетом в конструкторе Rave Report


15-1163246802
neud
2006-11-11 15:06
2006.12.03
sql


15-1163193656
ArtemESC
2006-11-11 00:20
2006.12.03
Как сделать поддержку субтитров?


15-1163157805
Elen
2006-11-10 14:23
2006.12.03
Конвертация 3D


4-1153470311
Степан
2006-07-21 12:25
2006.12.03
Как убрать полосы прокрутки у ListView