myatlctrl.rgs

来自「VC.net 的一些有用的技巧」· RGS 代码 · 共 37 行

HKCR
{
	ATLDemo.MyATLCtrl.1 = s 'MyATLCtrl Class'
	{
		CLSID = s '{5F0EA9A3-63DD-44FF-A15D-75916131033F}'
		'Insertable'
	}
	ATLDemo.MyATLCtrl = s 'MyATLCtrl Class'
	{
		CLSID = s '{5F0EA9A3-63DD-44FF-A15D-75916131033F}'
		CurVer = s 'ATLDemo.MyATLCtrl.1'
	}
	NoRemove CLSID
	{
		ForceRemove {5F0EA9A3-63DD-44FF-A15D-75916131033F} = s 'MyATLCtrl Class'
		{
			ProgID = s 'ATLDemo.MyATLCtrl.1'
			VersionIndependentProgID = s 'ATLDemo.MyATLCtrl'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
			{
				val ThreadingModel = s 'Apartment'
			}
			val AppID = s '%APPID%'
			ForceRemove 'Control'
			ForceRemove 'Insertable'
			ForceRemove 'ToolboxBitmap32' = s '%MODULE%, 102'
			'MiscStatus' = s '0'
			{
			    '1' = s '%OLEMISC%'
			}
			'TypeLib' = s '{8838334E-38D5-4E22-A864-8E25674D7680}'
			'Version' = s '1.0'
		}
	}
}