以下是vc的部分程式

我要如何以相同的方式在BCB上達到呢?

IMPLEMENT_DYNCREATE(Controller, CWnd)

/////////////////////////////////////////////////////////////////////////////
// Controllerproperty

BOOL Controller::GetOnStatusEnabled()
{
BOOL result;
GetProperty(0x1, VT_BOOL, (void*)&result);
return result;
}

void Controller::SetOnStatusEnabled(BOOL propVal)
{
SetProperty(0x1, VT_BOOL, propVal);
}