Cita:
Empezado por Neftali
Utilizando FindWindows, supongo que puedes acceder a la ventana que pertenece a la aplicación que buscas. Una vez que tengas el Handle de la ventana, puedes probar con otras funciones de la PAI del mismo grupo tipo, GetWindwPlacement, GetWindowRect,... para obtener las coordenadas.
|
Totalmente de acuerdo con Neftali, usando
FindWindow y
GetWindowPlacement se pueden obtener esos valores en pocas líneas y de forma sencilla:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
Handle: THandle;
wpPtr: TWindowPlacement;
R: TRect;
begin
Handle:= FindWindow(PChar('notepad'),nil);
if Handle <> 0 then
begin
GetWindowPlacement(Handle, @wpPtr);
R:= wpPtr.rcNormalPosition;
ShowMessage('Left: '+IntToStr(R.Left)+#10#13+
'Top: '+IntToSTr(R.Top)+#10#13+
'Right: '+IntToStr(R.Right)+#10#13+
'Bottom: '+IntToStr(R.Bottom))
end
end;
Saludos.