Informations file records

[78372]

Originally Posted by Titeuf

Hi 78372,
Thank you for your help, it's great!
One more thing, please, I want to copy the folder crack since install it to the directory of the game on the computer, (ex: as codex) what is the code to put?
Thank you for your help,
Titeuf

No idea it will work or not, this code is written in notepad

var
  NewCheckBox1: TNewCheckBox;
procedure InitializeWizard();
begin
    NewCheckBox1 := TNewCheckBox.Create(WizardForm);
  with NewCheckBox1 do
  begin
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(0);
    Top := ScaleY(96);
    Width := ScaleX(169);
    Height := ScaleY(17);
    Caption := 'Copy Crack from .\CRACK DIR';
  end;
  NewCheckBox1.TabOrder := 5;
end;

procedure CurStepChanged(CurStep: TSetupStep);
begin
  if CurStep = ssPostInstall then
    begin
    if NewCheckBox1.Checked then
    FileCopy(ExpandConstant('{src}\CRACK\*'),ExpandConstant('{app}\*'),false);
    end;
end;