Вход
unit Unit2;
intrface
uses ═════ComObj, Project1_TLB;
type ═════TAutoTest = class (TAutoObject, IAutoTest) ═════protected; ═════end;
implementation
uses ComServ;
initialization ═════TAutoObjectFactory.Create(ComServer, TAutoTest, Class_AutoTest, ciMultiInstance); end.