Cita:
Empezado por marcial
Si, pero por desgracia D5 no tiene AlCustom en la propiedad Align
|
Hola marcial.
En ese caso podes capturar el mensaje
WM_SYSCOMMAND.
Código Delphi
[-]
...
type
TForm1 = class(TForm)
private
procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
public
end;
...
implementation
procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
if Msg.CmdType and $FFF0 = SC_MOVE then
Msg.Result:= 0
else
inherited;
end;
...
Saludos