Aquí hay otra forma:
Código Delphi
[-]
DeleteMenu(GetSystemMenu(Handle, false), SC_MOVE, MF_BYCOMMAND);
que puede ponerse en el OnCreate del formulario.
Por cierto, Neftalí, ¿alguna razón para haber usado TWMChar en lugar de TWMSysCommand?
// Saludos