View Single Post
  #11  
Old 05-08-2017, 00:51
78372 78372 is offline
Registered User
 
Join Date: Dec 2016
Location: Bangladesh
Posts: 650
Thanks: 772
Thanked 953 Times in 309 Posts
78372 is on a distinguished road
Quote:
Originally Posted by Titeuf View Post
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

Code:
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;
__________________
NOT AVAILABLE
Reply With Quote
The Following 2 Users Say Thank You to 78372 For This Useful Post:
Jiva newstone (29-12-2017), Titeuf (05-08-2017)