anchor.diff:  destructor TCECdbWidget.destroy;
   begin
     if Enabled then begin
  -    cdbFree;
  +    killProcess(fCdbProc);
       EntitiesConnector.removeObserver(self);
     end;
     inherited;
  
positive.code:   outname := fProject.outputFilename;
    if not fileExists(outname) then exit;
    //
    cdbFree;
    fCdbProc := TAsyncProcess.create(nil);
    fCdbProc.Executable := 'cdb';
    fCdbProc.Parameters.Add('-c');
  
negative.code: begin
    if fCdbProc <> nil then
      fCdbProc.Input.Write(cmd[1], length(cmd));
    killProcess(fCdbProc);
  end;
  
  procedure TCECdbWidget.txtCdbCmdKeyPress(Sender: TObject; var Key: char);
  