anchor.diff:      IsStatic: Boolean;
       IsVirtual: Boolean;
       IsConst: Boolean;
  +    IsNeedParamReturn: Boolean;
       CppParams: string; // ԭcppĲԱصľ̬ʱ
       OverloadName: string; // ֵƣԶ
       Params: TArray<TParam>;
  
positive.code:     begin
        LReturnType := GetRealType(TypeOf(AM.ReturnType, True));
        LFuncFullName := DeleteSymbol(Format('Delphi_%s_%s%s', [AClassNoC, LFuncName, AM.OverloadName]));
        FDelphiImportA.AddFormat('function %s%s: %s; cdecl;', [LFuncFullName, LParams, LReturnType]);
        FDelphiImportB.AddFormat('function %s; external DuiLibdll name ''%s'';',
            [LFuncFullName, LFuncFullName]);
        // class a
        AddDelphiClassAMethod('    %sfunction %s%s: %s;%s', [LClassFuncFlags, LFuncName, LParams2,
          LReturnType, LOverload]);
        // class b
        AddDelphiClassBMethod('%sfunction %s.%s%s: %s;', [LClassFuncFlags, AClass, LFuncName, LParams21,
          LReturnType], 'Result := %s%s;', [LFuncFullName,
          LParams3], AM);
      end;
    end;
  end;
  
negative.code:   for L in AM.Params do
      Result := Result + Format('%s, ', [ParamNameOf(L.Name)]);
    if Result.Length <> 0 then
    begin
      Result := Result.Trim;
      Delete(Result, Result.Length, 1);
    end;
  end;
  
  function TCppConvert.GetHead(const Str: string): string;
  