[Gareth]

Сообщение от Alegun

Вместо таймера используйте OnMove т.е. отслеживайте перемещение формы

Код:

...
private
   procedure OnMove(var Msg: TWMMove); message WM_MOVE;
...

procedure TForm1.OnMove(var Msg: TWMMove);

var
  h: HWND;
begin

inherited;

  x:=form1.Left;
  y:=form1.Top+12;
  h := findwindow(nil, 'C:\WINDOWS\system32\cmd.exe');
  if h <> 0 then
       SetWindowPos(h, HWND_BOTTOM, x, y, 0,0,  swp_nosize);
end;

Сделал так, но ничего не изменилось.
Перетаскиваю свою форму, она на несколько пикселей двигается(окно cmd.exe вместе с ней, всё как надо), а дальше стопорится и форма и окно cmd.exe, как будто отпустил кнопку мышки при перетаскивании.
Может что-от не так делаю?