RAD10.2.3-和谐含源码

unitRadLicense;interfaceusesRadVersion,SysUtils;functionCreateLicenseText(SerialNumber,ActiveCode:string;RadStudioVersion:PRadStudioVersion):string;implementationfunctionCreateLicenseText(SerialNumber,ActiveCode:string;RadStudioVersion:PRadStudioVersion):string;varpid,skuid:string;beginpid:=IntToStr(RadStudioVer