void TOleDocWindow::RegFileName( LPSTR FileName ) { lstrcpy( lpszDocName , FileName ); ret = OleRegisterClientDoc( GetApplication()->Name, lpszDocName , 0, &lhClientDoc ); check ( ret ); }
void TOleDocWindow::RegisterClientDoc() { // Tip for using OleRegisterClientDoc: // if the lpszDoc parameter passed to // OleRegisterClientDoc is not valid, (lpszPatnName in this case), // one can get an OLE_ERROR_ADDRESS error, and the ClientDoc // handle will not be valid. ret = OleRegisterClientDoc( GetApplication()->Name, lpszDocName, 0, &lhClientDoc ); check( ret ); }
void IT_REGCLIENTDOC(ENV *envp,LONGPROC f) { LHCLIENTDOC lhHandle; LPSTR lpString1,lpString2; LPBYTE lpStr; DWORD retcode; lpString1 = (LPSTR)GetAddress(GETWORD(SP+18),GETWORD(SP+16)); lpString2 = (LPSTR)GetAddress(GETWORD(SP+14),GETWORD(SP+12)); lpStr = (LPBYTE)GetAddress(GETWORD(SP+6),GETWORD(SP+4)); retcode = OleRegisterClientDoc(lpString1,lpString2,0L,&lhHandle); PUTDWORD(lpStr,lhHandle); envp->reg.sp += 3*LP_86 + DWORD_86 + RET_86; envp->reg.ax = LOWORD(retcode); envp->reg.dx = HIWORD(retcode); }