|
Hola
¿Como haces para mover una ventana maximizada?
En todo caso puedes declarar en el form un procedimiento para evitarlo.
Declaración:
procedure WndProc(var Message: TMessage); override;
Implementación:
procedure TForm1.WndProc(var Message: TMessage);
begin
case Message.Msg of
WM_SYSCOMMAND: if (Message.WParam and $FFF0)= SC_MOVE then
Message.Result:=0 {no hace nada}
else
inherited;
else
inherited;
end;
end;
Espero te sirva.
__________________
Cancun, Q.Roo, México
|