Haga que Inno Setup WizardForm se pueda mover si la barra de título está deshabilitada
Quiero hacer un instalador con un aspecto personalizado y deshabilitar la barra de título configurando laBorderStyle
absNone
.
Ahora ya no puedo mover la ventana. He mirado a mi alrededor y he encontrado una solución para Delphi:
http://www.chami.com/tips/delphi/010397D.html
¿Se puede lograr esto en Inno Setup?
Ya he buscado elWM_NCHITTEST
cosa en MSDN pero no puedo entender si y cómo puedo hacer que esto funcione.
Editar: Después de mirar alrededor y compilarlo usando elcompilador avanzado compilador avanzado se me ocurrió esto, pero no funciona. Se compila, pero cuando hago clic dentro de la ventana, no puedo arrastrarla.
procedure Dragg(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
SendMessage(WizardForm.Handle, $F112, $F012, 0);
end;
procedure InitializeWizard();
begin
WizardForm.OnMouseDown := @Dragg;
end;