Ver Mensaje Individual
  #3  
Antiguo 07-05-2003
cancun cancun is offline
Miembro
 
Registrado: may 2003
Ubicación: Cancun, México
Posts: 115
Reputación: 24
cancun Va por buen camino
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
Responder Con Cita