Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Как запретить перемещение формы?

01.01.2007
type
 
TyourForm = class(TForm)
 
private
   
{ Private declarations }
    procedure
WMNCHitTest(var Message: TWMNCHitTest); message WM_NCHITTEST;
 
end;
 
procedure
TyourForm.WMNCHitTest(var Message: TWMNCHitTest);
begin
  inherited
;
 
 
with Message do
   
if Result = HTCAPTION then
     
Result := HTNOWHERE;
end;

Взято с Delphi Knowledge Base: https://www.baltsoft.com/