Advertisement
TLama

Untitled

Mar 13th, 2015
443
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.46 KB | None | 0 0
  1. [Setup]
  2. AppName=My Program
  3. AppVersion=1.5
  4. PrivilegesRequired=lowest
  5. DefaultDirName={pf}\My Program
  6.  
  7. [Code]
  8. var
  9.   MyPage: TInputFileWizardPage;
  10.  
  11. procedure InitializeWizard;
  12. begin
  13.   MyPage := CreateInputFilePage(wpWelcome, 'Caption', 'Description', 'SubCaption');
  14. end;
  15.  
  16. procedure CurPageChanged(CurPageID: Integer);
  17. begin
  18.   if CurPageID = MyPage.ID then
  19.   begin
  20.     MyPage.Caption := 'New caption';
  21.     MyPage.Description := 'New description';
  22.   end;
  23. end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement