anchor.diff:    i: Integer;
     prms: string;
   begin
  -  killProcess(fProcess);
  +  ce_processes.killProcess(fProcess);
     //
     if fClearMessages then
       getMessageDisplay(fMsgs).clearByContext(amcMisc);
     //
  -  fProcess := TCheckedAsyncProcess.Create(nil);
  +  fProcess := TCEProcess.Create(nil);
     fProcess.OnReadData:= @processOutput;
     fProcess.OnTerminate:= @processOutput;
     fProcess.Options := fOpts;
  
positive.code:   fParameters.Free;
    fChainAfter.Free;
    fChainBefore.Free;
    killProcess(fProcess);
    inherited;
  end;
  
  
negative.code:   getMessageDisplay(fMsgs);
    lst := TStringList.Create;
    try
      fProcess.getFullLines(lst);
      for str in lst do
        fMsgs.message(str, nil, amcMisc, amkAuto);
    finally
  