단지 최상단에 놓기만 하는 겁니다.

포스트잇 처럼 내려가지도 않고 항상 최상단이게 만드는 방법입니다. 참고만 하세요..
중요 키포인트는  아래 두줄입니다.
ExStyle := ExStyle or WS_EX_TOOLWINDOW or WS_EX_TOPMOST ;
WndParent := GetDesktopWindow;
요부분입니다.

protected
procedure CreateParams(var Params: TCreateParams); override;
...
procedure TForm1.CreateParams(var Params: TCreateParams);
const
  CS_DROPSHADOW = $00020000;
begin
  inherited;

  with Params do
  begin
    Style   := Style and ( not WS_CAPTION );
    ExStyle := ExStyle or WS_EX_TOOLWINDOW or WS_EX_TOPMOST ;
    WndParent := GetDesktopWindow;
  end;

end;