Устанавливались файлы при двух активных RadioButton?

MISHAWIN

Новичок
Хотел бы узнать, как сделать так, что бы конкретные файлы устанавливались при активной RadioButton10Check и RadioButton15Check?

К примеру для одной RadioButton10Check должно быть так, а для для двух одновременно?
Код:
Source: "D:\MyFile\File\*"; DestDir: "{app}"; Check: RadioButton10Check; Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs
 

Andreo Fadio

Старожил
@MISHAWIN, примерно так:
Код:
[Files]
Source: "D:\MyFile\File1\*"; DestDir: "{app}"; Check: RadioButtonChecker(0); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs
Source: "D:\MyFile\File2\*"; DestDir: "{app}"; Check: RadioButtonChecker(1); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs
Source: "D:\MyFile\File3\*"; DestDir: "{app}"; Check: RadioButtonChecker(2); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs

[Code]
function RadioButtonChecker(Number: Integer): Boolean;
begin
 case Number of
  0: if RadioButton10.checked then Result:= True;
  1: if RadioButton15.checked then Result:= True;
  2: if RadioButton10.checked and RadioButton15.checked then Result:= True;
 end;
end;

За одно уменьшите количество функций для параметра check
 

MISHAWIN

Новичок
@MISHAWIN, примерно так:
Код:
[Files]
Source: "D:\MyFile\File1\*"; DestDir: "{app}"; Check: RadioButtonChecker(0); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs
Source: "D:\MyFile\File2\*"; DestDir: "{app}"; Check: RadioButtonChecker(1); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs
Source: "D:\MyFile\File3\*"; DestDir: "{app}"; Check: RadioButtonChecker(2); Flags: ignoreversion overwritereadonly recursesubdirs createallsubdirs

[Code]
function RadioButtonChecker(Number: Integer): Boolean;
begin
case Number of
  0: if RadioButton10.checked then Result:= True;
  1: if RadioButton15.checked then Result:= True;
  2: if RadioButton10.checked and RadioButton15.checked then Result:= True;
end;
end;

За одно уменьшите количество функций для параметра check
Спасибо за ответ.
 
Сверху