Вопрос Как сделать что-бы моя кнопка закрывала инсталятор.

Spikeone

Новичок
Что нужно добавить в код после procedure FinishButtonOnClick , что-бы моя кнопка закрывала инсталятор. Проще говоря выполняла функции стандартной кнопки "Завершить"?

procedure FinishButtonOnClick(Sender: TObject);
begin
//.......................
end;

var
FinishButton: TNewButton;

Procedure CurPageChanged(CurPageID: Integer);
Begin case CurPageID of
wpFinished:
begin
FinishButton := TNewButton.Create(WizardForm.FinishedPage);
FinishButton.Parent := WizardForm;
FinishButton.Left := ScaleX(200);;
FinishButton.Top := ScaleY(485);
FinishButton.Width:=ScaleX(100);
FinishButton.Caption :=SetupMessage(msgButtonFinish);
FinishButton.OnClick := @FinishButtonOnClick;
end;
end;
end;
 
Сверху