setbg.rgs

来自「此上载文件包含了多个用vc开发的实例。包含了VCL控件的使用」· RGS 代码 · 共 27 行

HKCR
{
	WndBG.SetBG.1 = s 'SetBG Class'
	{
		CLSID = s '{E3F0A13F-4F7A-11D5-B778-00D009E4D2C8}'
	}
	WndBG.SetBG = s 'SetBG Class'
	{
		CLSID = s '{E3F0A13F-4F7A-11D5-B778-00D009E4D2C8}'
		CurVer = s 'WndBG.SetBG.1'
	}
	NoRemove CLSID
	{
		ForceRemove {E3F0A13F-4F7A-11D5-B778-00D009E4D2C8} = s 'SetBG Class'
		{
			ProgID = s 'WndBG.SetBG.1'
			VersionIndependentProgID = s 'WndBG.SetBG'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
			{
				val ThreadingModel = s 'Apartment'
			}
			'TypeLib' = s '{E3F0A131-4F7A-11D5-B778-00D009E4D2C8}'
		}
	}
}