Změna velokostí okna exe aplikace přes FindWindow (Delphi)

Nazdárek.
Neví někdo proč mi to nefunguje.

var
MyHandle: THandle;
WinRect: TRect;
begin
MyHandle:=FindWindow(nil,'Putty.exe');
GetWindowRect(MyHandle, WinRect);
MoveWindow(MyHandle, WinRect.Left, WinRect.Top, 700, 300, True);
end;