anchor.diff:      [TPath.GetFileName(FullExePath) + ' ' + STR_CLI_OPTION_PREFIX + STR_CLI_OPTION_HELP]));
   end;
   
  -procedure TFIToolkit.PrintTotalDuration;
  -begin
  -  PrintLn(Format(RSTotalDuration, [String(FWorkflowState.TotalDuration)]));
  -end;
  -
   procedure TFIToolkit.PrintVersion;
   begin
     PrintLn(GetAppVersionInfo);
  
positive.code: 
  { TFIToolkit }
  
  constructor TFIToolkit.Create(const FullExePath : TFileName; const CmdLineOptions : TStringDynArray);
  begin
    inherited Create;
  
negative.code:     private
        FNoExitBehavior : TNoExitBehavior;
  
        procedure ActualizeExitCode(var CurrentExitCode : Integer);
        procedure ProcessOptions;
  
        // Application commands implementation:
        procedure PrintHelp;
  