Fijar la posicion de un showModal

[NuncaMas]

Tengo un formulario abierto con showModal y necesito que su posicion no se pueda modificar arrastrandolo. Alguien sabe que propiedad debo usar??

[Neftali [Germán.Estévez]]

Bueno, hay varias formas interceptando mensajes, una puede ser la siguiente; En tu form modal define en la parte privada éste método:


...
private
procedure OnPosChange(var Msg: TWmWindowPosChanging); message WM_WINDOWPOSCHANGING;
...

// Implementación
...
procedure TForm2.OnPosChange(var Msg: TWmWindowPosChanging);
begin
Msg.WindowPos.x := Left;
Msg.WindowPos.y := Top;
Msg.Result := 0;
end;


Con eso debería ser suficiente.