No hay respuestas en este tema

[sir.dev.a.lot]

[TRUCO DELPHI] Haciendo un Formulario No movible.

 

Declaracion

delphi

procedure PosChange(var Msg: TWmWindowPosChanging);
  message WM_WINDOWPOSCHANGING;

Procedimiento

delphi

procedure TForm1.PosChange
  (var Msg: TWmWindowPosChanging);
begin
   Msg.WindowPos.x := Left;
   Msg.WindowPos.y := Top;
   Msg.Result := 0;
end;

Saludos!