Вопрос
Как определить координаты окна чужого приложения (известен класс окна и Caption) ?
Ответ
procedure TForm1.Button1Click(Sender: TObject);
var
R: TRect;
P: TPoint;
begin
GetWindowRect(FindWindow(SomeClass, SomeCaption), R);
P.X := R.Left;
P.Y := R.Top;
ShowMessage('x: ' + IntToStr(P.X) + ' y: ' + IntToStr(P.Y));
end;
Из конференции Expert_FAQ
Copyright 2000-2004 Сообщество Чайников
Контактная информация