扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
图1 永久数据链路的建立与撤消 |
HGLOBAL hOptions = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, sizeof(DDEADVISE)); // 分配内存块 DDEADVISE* lpOptions = (DDEADVISE*)GlobalLock(hOptions); // 锁定内存 lpOptions->cfFormat = CF_TEXT; // 格式设置 lpOptions->fAckReq = TRUE; // 需要服务器应答 lpOptions->fDeferUpd = FALSE; // FALSE为热链接,TRUE为温链接 GlobalUnlock(hOptions); // 解锁内存 ATOM atomItem = GlobalAddAtom("Item C"); // 得到数据项原子标识值 HWND hwndClient = GetSafeHwnd(); // 获取当前窗口的安全句柄 // 组合消息参数lParam LONG lDataPack = PackDDElParam(WM_DDE_ADVISE, (UINT)hOptions, atomItem); ::PostMessage(m_hwndServer, WM_DDE_ADVISE, (WPARAM)hwndClient, (LPARAM)lDataPack); // 向服务器发送WM_DDE_ADVISE消息 |
typedef struct { // ddeadv UINT fAdvise:1, // 开通数据链路 fDeferUpd:1, // 推迟更新 fAckReq:1, // 要求应答 dummy:13; LONG lPrev; // 数据项原项 } SERVERADVISE; |
CString sCurrentValue = "Value1"; // 当前数据值 UINT uLo, uHi; // lParam消息的低、高字 char szItemNameClient[255]; // 客户发来的数据项名 UnpackDDElParam(WM_DDE_ADVISE, lParam, &uLo, &uHi); // 对lParam进行解包 // 取客户请求的数据项名 GlobalGetAtomName(uHi, szItemNameClient, sizeof(szItemNameClient)); if (CString(szItemNameClient) != "Item C") { // 判断是否可建立链接 AfxMessageBox("永久链路无法建立!"); // 反馈信息 // 组合消息参数lParam LONG lDataPack = PackDDElParam(WM_DDE_ACK, (UINT)0, HIWORD(lParam)); ::PostMessage((HWND)wParam, WM_DDE_ACK, (WPARAM)m_hwndServer, (LPARAM)lDataPack); // 向客户发送否定应答 return; } // 锁定内存 DDEADVISE* lpDDEAdvise = (DDEADVISE*)GlobalLock((HGLOBAL)uLo); // 锁定内存 SERVERADVISE* lpServerAdvise = (SERVERADVISE*)GlobalLock(m_hServerAdvise); lpServerAdvise->fAdvise = TRUE; // 数据项建立连接 lpServerAdvise->fDeferUpd = lpDDEAdvise->fDeferUpd; // 推迟更新 lpServerAdvise->fAckReq = lpDDEAdvise->fAckReq; // 要求应答 lpServerAdvise->lPrev = (LONG)&sCurrentValue; // 数据项原值 GlobalUnlock(m_hServerAdvise); // 解锁内存 m_bHaveALink = TRUE; // 设立建立永久链接的标志 AfxMessageBox("成功建立永久链路!"); // 反馈信息 LONG lDataPack = PackDDElParam(WM_DDE_ACK, (UINT)0x8000, HIWORD(lParam)); // 组合消息参数lParam ::PostMessage((HWND)wParam, WM_DDE_ACK, (WPARAM)m_hwndServer, (LPARAM)lDataPack); // 向客户发送肯定应答 |
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者