Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Забанен


Сообщения: 7
Благодарности: 2

Профиль | Цитировать


Привет всем!
Подскажите пожалуйста люди добрые, как сделать так чтобы не копировался файл если выбран другой?

Код
Код: Выделить весь код
[Files]
Source: Config,1.ini; DestDir: {app}; Check: not CoonfCheck
Source: Config,2.ini; DestDir: {app}; Check: CoonfCheck

[*Code]
var
  MyPage: TWizardPage;
  MyCheckBox: TNewCheckBox;

procedure MyForm;
begin
  MyPage := CreateCustomPage(wpWelcome, 'Caption', 'Description');
  with MyPage.Surface do
  begin
    Name := 'Automatic';
  end;
  
  MyCheckBox := TNewCheckBox.Create(WizardForm);
  with MyCheckBox do
  begin
    Name := 'Automatic';
    Parent := MyPage.Surface;
    Left := ScaleX(32);
    Top := ScaleY(24);
    Width := ScaleX(97);
    Height := ScaleY(17);
  end;

  MyCheckBox.TabOrder := 0;
end;

procedure InitializeWizard();
begin
  MyForm;
end;
El Sanchez, Благодарствую, работает отлично.

Отправлено: 23:47, 13-06-2012 | #262