///////////////////////////////////////////////////////////////////////////////
// GetMethodsName: Get methods name list
bool CScriptObject::GetMethodsName()
{
bool bResult = false;
if (m_pScript != NULL)
{
IScriptProcedureCollectionPtr pIProcedures = m_pScript->GetProcedures();
// empty list...
m_FunctionList.clear();
try{
long count = pIProcedures->GetCount();
for(long index=1; index <= count; index++)
{
IScriptProcedurePtr pIProcPtr = pIProcedures->GetItem( _variant_t(index) );
_bstr_t name = pIProcPtr->GetName();
m_FunctionList.insert(m_FunctionList.end(), (LPCTSTR) name );
pIProcPtr = NULL;
}
bResult = true;
}
catch(...)
{
// Just catch the exception, call GetErrorString()
// to retreive last error
}
pIProcedures = NULL;
}
return bResult;
}
bool ScriptEngine::GetMethodsName()
{
bool bResult = false;
if (_ptr != NULL)
{
ComPtr<IScriptProcedureCollection> pProcedures(_ptr->GetProcedures());
// empty list...
_FunctionList.RemoveAll();
try{
long count = pProcedures->GetCount();
for (long index = 1; index <= count; index++)
{
IScriptProcedurePtr pIProcPtr = pProcedures->GetItem(_variant_t(index));
_bstr_t name = pIProcPtr->GetName();
_FunctionList.AddTail((LPCTSTR)name);
pIProcPtr = NULL;
}
bResult = true;
}
catch (...)
{
}
pProcedures = NULL;
}
return bResult;
}