Delphi - Form inmovil

Hola:

lo que me interesa lograr es que no puedan mover el formulario por la pantalla, es decir que se mantenga fijo en un lugar, y que no sea cambiando las propiedad BorderStyle a BsNone

Saludos
Lithium

Aqui te va un poco de codigo. En el intercepto el mensage que le mandan a la ventana antes de moverla y cambio uno de los parametros para indicar que la ventana no debe ser movida.

// Comienzo del codigo

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMWINDOWPOSCHANGING (var Msg: TMessage); message WM_WINDOWPOSCHANGING;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.WMWINDOWPOSCHANGING (var Msg: TMessage);
var
WINDOWPOS: ^TWINDOWPOS;
begin
WINDOWPOS:= Pointer(Msg.lParam);
WINDOWPOS^.flags:= WINDOWPOS^.flags or SWP_NOMOVE;
end;

end.

// Fin del codigo