[R.i.m.s.k.y.]

Код:

[Files]
Source: "{port}\*"; DestDir: "{code:GetPath}"; Flags: ignoreversion createallsubdirs recursesubdirs; Check: Portable

[Code]

var isportable : boolean;

function Portable: Boolean;
begin
  Result := PortableRadioButton.Checked or isportable;
end;

Function InitializeSetup: Boolean;
var i : integer;
Begin
  for i:=2 to ParamCount do begin
  if ( Pos(LowerCase('/p'), Lowercase(ParamStr(i))) > 0 ) then isportable := true else isportable := false;
end;//for
end;