Combreal

StartupShorctcut.iss

May 29th, 2020
978
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. [Icons]
  2. //Name: "{userstartmenu}\Ubuntu"; Filename: "{app}\ubuntu1804.exe"
  3.  
  4. [Code]
  5. procedure CurStepChanged(CurStep: TSetupStep);
  6. var
  7.   ResultCode: Integer;
  8.  begin
  9.   if CurStep = ssPostInstall then
  10.   begin
  11.     FileCopy(ExpandConstant('{app}\ubuntu1804.exe'), ExpandConstant('{userstartmenu}\Ubuntu'), False);
  12.   end;
  13.  end;
RAW Paste Data