anchor.diff:      fOpts: TProcessOptions;
       fParameters: TStringList;
       fToolAlias: string;
  +    fQueryParams: boolean;
       //fShortcut: string;
       fLogMessager: TCELogMessageSubject;
       procedure setParameters(const aValue: TStringList);
  
positive.code:     property workingDirectory: string read fWorkingDir write fWorkingDir;
      property parameters: TStringList read fParameters write setParameters;
      property showWindows: TShowWindowOptions read fShowWin write fShowWin;
      //property shortcut: string read fShortcut write fShortcut;
    public
      constructor create(ACollection: TCollection); override;
  
negative.code:   fProcess.Executable := symbolExpander.get(fExecutable);
    fProcess.ShowWindow := fShowWin;
    fProcess.CurrentDirectory := symbolExpander.get(fWorkingDir);
    if fQueryParams then
    begin
      prms := '';
      if InputQuery('Parameters', '', prms) then
        if prms <> '' then fProcess.Parameters.DelimitedText := symbolExpander.get(prms);
    end;
    for i:= 0 to fParameters.Count-1 do
        fProcess.Parameters.AddText(symbolExpander.get(fParameters.Strings[i]));
    fProcess.Execute;
  