Tornar o Inno Setup WizardForm móvel se a barra de título estiver desativada
Eu quero fazer um instalador com uma aparência personalizada e desabilitado a barra de título, definindo oBorderStyle
parabsNone
.
Agora não posso mais mover a janela. Eu olhei em volta e encontrei uma solução para o Delphi:
http://www.chami.com/tips/delphi/010397D.html
Isso pode ser feito no Inno Setup?
Eu já procurei oWM_NCHITTEST
coisa no MSDN, mas não consigo descobrir se e como posso fazer isso funcionar.
Edit: Depois de olhar em volta e compilá-lo usando ocompilador avançado compilador avançado eu vim com isso, mas não funciona. Ele compila, mas quando clico dentro da janela, não consigo arrastá-lo.
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;