Exemplo n.º 1
0
//   BOOL ViCbSetName(VApiHandle hWnd, LPCTSTR pstrName)
SQInteger ViCbSetName(HSQUIRRELVM v)
{
	SQInteger      nargs         = sq_gettop(v);
	SQInteger      Handle        = 0;
	CControlUI*    pCtrl         = NULL;
	LPCTSTR        pstrName      = NULL;
	if (!v || 2 + 1 != nargs) {goto _Exit_;}
	if (OT_INTEGER != sq_gettype(v, 2)) {goto _Exit_;}
	if (OT_STRING != sq_gettype(v, 3)) {goto _Exit_;}
	
	sq_getinteger(v, 2, &Handle);
	sq_getstring(v, 3, &pstrName);
	pCtrl = QiHwHandleToCtrl(Handle);
	if (!pCtrl) {goto _Exit_;}
	pCtrl->SetName(pstrName);
	
_Exit_:
	sq_pushbool(v, TRUE);
	return 1;
}