Позиция окна, по Handle.

[Izhic]

Всем привет.

  Windows.GetClientRect(hWnd,rct);
  GetCurrentPositionEx(GetDC(hWnd),@posit);

попробовал этими двумя способами получить позицию по handle,
у меня выдает позиция 0,0 вероятно сам относительно себя.
Как получить Позицию относительно дисплея?

[Пепел Феникса]

var W:TWindowPlacement;
begin
 ZeroMemory(@W,SizeOf(W));
 W.length:=SizeOf(W);
 GetWindowPlacement(Form1.Handle,@W);
 ShowMessage('По запросу координаты '+IntToStr(W.rcNormalPosition.Left)+' , '+IntToStr(W.rcNormalPosition.Top)+#10#13+'По данным формы коодинаты '+IntToStr(Form1.Left)+' , '+IntToStr(Form1.Top)+'.');
end;

вот как я сделал
результаты одинаковые значит все верно

[Goodwin98]

Как насчет того, чтобы просто вызвать GetWindowRect ?

[russian-stalker]

Я у себя в проекте делал так:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  r:trect;
begin
if getforegroundwindow<>0 then
begin
   getwindowrect(getforegroundwindow,r);
   label1.Caption:='Handle: '+inttostr(getforegroundwindow)+'; Left: '+inttostr(r.Left)+'; Top: '+inttostr(r.Top);
end;
end;

[Izhic]

windows.GetWindowRect действительно лучше оказался в моём случае.
Пепел Феникса GetWindowPlacement возвратил мне относительные координаты.

russian-stalker,Goodwin98 спасибо.

Я тащу координаты swf-окна из firefox GetWindowPlacement - возвращает относительные.