tify">// HRESULT WINAPI UpdateRegistry (BOOL bRegister)
{ (GetObjectCLSID (), GetProgID (), GetDescription ()); regObj.UpdateRegistry (bRegister);
} _COM_MAP (TOOPAmpAutoImpl) _INTERFACE_ENTRY (IOOPAmpAuto) _INTERFACE_ENTRY2 (IDispatch,
// IOOPAmpAuto: TOOPAmpAutoImpl :: get_Position (int * Value); TOOPAmpAutoImpl :: set_Position (int Value); TOOPAmpAutoImpl :: get_R (double * Value); TOOPAmpAutoImpl :: set_R (double Value); TOOPAmpAutoImpl :: get_NC (int * Value); TOOPAmpAutoImpl :: set_NC (int Value); (get_NC (unsigned * Value)); (get_Position (long * Value)); (get_R (unsigned * Value)); (set_NC (unsigned Value)); (set_Position (long Value)); (set_R (unsigned Value));
};
# endif// OOPAmpAutoImplH.cpp
// OOPAMPAUTOIMPL: Implementation of TOOPAmpAutoImpl (CoClass: OOPAmpAuto, Interface: IOOPAmpAuto)
# include
# include "Main.h"
# pragma hdrstop
# include "OOPAMPAUTOIMPL.H"
// TOOPAmpAutoImplTOOPAmpAutoImpl :: get_Position (int * Value)
{
{TReostat * Reostat = new TReostat ();
* Value = Reostat-> GetPosition ();} (Exception & e)
{return Error (e.Message.c_str (), IID_IOOPAmpAuto);} S_OK;
}; TOOPAmpAutoImpl :: set_Position (int Value)
{try
{TReostat * Reostat = new TReostat ();> SetPosition (Value);> Draw ();
} (Exception & e)
{return Error (e.Message.c_str (), IID_IOOPAmpAuto);} S_OK;
}; TOOPAmpAutoImpl :: get_R (double * Value)
{try
{TReostat * Reostat = new TReostat ();
* Value = Reostat-> GetR ();} (Exception & e)
{return Error (e.Message.c_str (), IID_IOOPAmpAuto);} S_OK;
}; TOOPAmpAutoImpl :: set_R (double Value)
{
{TReostat * Reostat = new TReostat ();> SetR (Value);> Label4-> Caption = Value;
} (Exception & e)
{return Error (e.Message.c_str (), IID_IOOPAmpAuto);} S_OK;
}; TOOPAmpAutoImpl :: get_NC (int * Value)
{try
{TReostat * Reostat = new TReostat ();
* Value = Reostat-> GetNC ();} (Exception & e)
{return Error (e.Message.c_str (), IID_IOOPAmpAuto);} S_OK;
}; TOOPAmpAutoImpl :: set_NC (int Value)
{try
{TReostat * Reostat = new TReostat ();> SetNC (Value);> Draw ();
} (Except...
