exit in full page
Code:
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
Confirm:=False;
end;
exit to selectdir
Code:
Procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
Begin
if CurPageID = wpSelectDir then
Confirm:=False;
end;
codex use fade type:
Code:
[ CODE]
const
AW_FADE_OUT = $00090000;
function AnimateWindow(hWnd: HWND; dwTime: DWORD; dwFlags: DWORD): Boolean;
external 'AnimateWindow@user32 stdcall';
Procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
Begin
Confirm:=False;
AnimateWindow(WizardForm.Handle,300,AW_FADE_OUT);
end;