smtpmodel.rgs

来自「DarkATLSmtp(SMTP COM 组件原创代码),注册后可在Delphi」· RGS 代码 · 共 27 行

HKCR
{
	DarkSmtp.SmtpModel.1 = s 'SmtpModel Class'
	{
		CLSID = s '{863E92A2-F66E-4740-89B2-7F3A30CA1BF0}'
	}
	DarkSmtp.SmtpModel = s 'SmtpModel Class'
	{
		CLSID = s '{863E92A2-F66E-4740-89B2-7F3A30CA1BF0}'
		CurVer = s 'DarkSmtp.SmtpModel.1'
	}
	NoRemove CLSID
	{
		ForceRemove {863E92A2-F66E-4740-89B2-7F3A30CA1BF0} = s 'SmtpModel Class'
		{
			ProgID = s 'DarkSmtp.SmtpModel.1'
			VersionIndependentProgID = s 'DarkSmtp.SmtpModel'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
			{
				val ThreadingModel = s 'Apartment'
			}
			'TypeLib' = s '{B4967FD8-35C2-4C94-8A19-BE59F5E925CA}'
		}
	}
}