anchor.diff:  {$ENDIF}
   end;
   
  +procedure RunConsoleApplicationAndGetOutput(const aCommand: string; const aParameters : array of string; out aOutputText: String);
  +var
  +  tmpProcess: TProcess;
  +  tmpStringList: TStringList;
  +begin
  +  tmpProcess := TProcess.Create(nil);
  +  try
  +    tmpProcess.Executable := aCommand;
  +    tmpProcess.Parameters.AddStrings(aParameters);
  +    tmpProcess.Options := tmpProcess.Options + [poWaitOnExit, poUsePipes];
  +    tmpProcess.Execute;
  +    tmpStringList := TStringList.Create;
  +    try
  +      tmpStringList.LoadFromStream(tmpProcess.Output);
  +      aOutputText := tmpStringList.Text;
  +    finally
  +      tmpStringList.Free;
  +    end;
  +  finally
  +    tmpProcess.Free;
  +  end;
  +end;
  +
   function GetTimeStampForFileName(const aInstant: TDateTime; const aAddTime : boolean = true): string;
   var
     year, month, day : word;
  
positive.code: function IsRunningAsRoot: boolean;
  function CurrentProcessId: cardinal; // look at Indy function CurrentProcessId: TIdPID;
  
  implementation
  
  uses
    DateUtils, base64, strutils,
    {$IFDEF WINDOWS}shlobj, registry, winutils,{$ELSE}LazUTF8,{$ENDIF}
    {$IFDEF LINUX}initc, ctypes, BaseUnix,{$ENDIF}
    mMathUtility;
  
negative.code: 
  end;
  
  function TryToUnderstandDateTimeString(const aInputString: String; out aValue: TDateTime): boolean;
  var
    i : integer;
  