代码无误但LCD12864无反应

时间: 2023-11-12 11:37:38 浏览: 32
实现鼠标自由拖拽式选中与复制Listbox控件的文本,需要在对话框类中重载以下消息处理函数: 1. WM_LBUTTONDOWN: 当鼠标左键按下时,记录鼠标的起始位置和当前选中的项。 2. WM_MOUSEMOVE: 当鼠标移动时,根据当前鼠标位置计算出选中的项,并更新Listbox控件的选择状态。 3. WM_LBUTTONUP: 当鼠标左键松开时,将选中的文本复制到剪切板中。 以下是示例代码: // 在对话框类中添加以下成员变量 CListBox m_listBox; CPoint m_startPoint; int m_startIndex = -1; int m_endIndex = -1; // 在OnInitDialog函数中初始化Listbox控件,并为其添加消息处理函数 BOOL CMyDialog::OnInitDialog() { CDialogEx::OnInitDialog(); // 初始化Listbox控件 m_listBox.Create(WS_CHILD | WS_VISIBLE | WS_VSCROLL | LBS_HASSTRINGS | LBS_NOTIFY, CRect(10, 10, 200, 200), this, IDC_LIST_BOX); m_listBox.AddString(_T("Item 1")); m_listBox.AddString(_T("Item 2")); m_listBox.AddString(_T("Item 3")); m_listBox.AddString(_T("Item 4")); m_listBox.AddString(_T("Item 5")); m_listBox.AddString(_T("Item 6")); // 为Listbox控件添加消息处理函数 m_listBox.SetExtendedStyle(LVS_EX_FULLROWSELECT); m_listBox.ModifyStyleEx(0, LVS_EX_GRIDLINES); m_listBox.SetFocus(); m_listBox.SendMessage(LB_SETCURSEL, 0, 0); m_listBox.SetFont(GetFont()); return TRUE; } // 在消息映射中添加以下消息处理函数 BEGIN_MESSAGE_MAP(CMyDialog, CDialogEx) // 鼠标左键按下 ON_WM_LBUTTONDOWN() // 鼠标移动 ON_WM_MOUSEMOVE() // 鼠标左键松开 ON_WM_LBUTTONUP() END_MESSAGE_MAP() // 鼠标左键按下 void CMyDialog::OnLButtonDown(UINT nFlags, CPoint point) { m_startPoint = point; m_startIndex = m_listBox.ItemFromPoint(point, TRUE); m_endIndex = m_startIndex; m_listBox.SetSel(m_startIndex, TRUE); CDialogEx::OnLButtonDown(nFlags, point); } // 鼠标移动 void CMyDialog::OnMouseMove(UINT nFlags, CPoint point) { if (nFlags & MK_LBUTTON) { int index = m_listBox.ItemFromPoint(point, TRUE); if (index != LB_ERR) { m_endIndex = index; m_listBox.SetSel(m_startIndex, FALSE); m_listBox.SetSel(index, TRUE); } } CDialogEx::OnMouseMove(nFlags, point); } // 鼠标左键松开 void CMyDialog::OnLButtonUp(UINT nFlags, CPoint point) { CString text; int count = m_listBox.GetSelCount(); if (count > 0) { int* indices = new int[count]; m_listBox.GetSelItems(count, indices); for (int i = 0; i < count; i++) { CString itemText; m_listBox.GetText(indices[i], itemText); text += itemText + _T("\r\n"); } delete[] indices; if (OpenClipboard()) { EmptyClipboard(); HGLOBAL hMem = GlobalAlloc(GMEM_MOVEABLE, (text.GetLength() + 1) * sizeof(TCHAR)); if (hMem != NULL) { TCHAR* pText = (TCHAR*)GlobalLock(hMem); _tcscpy_s(pText, text.GetLength() + 1, text); GlobalUnlock(hMem); SetClipboardData(CF_UNICODETEXT, hMem); } CloseClipboard(); } } m_listBox.SetSel(m_startIndex, FALSE); m_startIndex = -1; m_endIndex = -1; CDialogEx::OnLButtonUp(nFlags, point); }

相关推荐

最新推荐

recommend-type

基于DSP的自动代码生成及其在电池管理系统中的应用

模型验证无误后,运用embedded target for TI C2000实现控制器的自动代码生成,并在硬件平台上对自动生成的代码进行了验证。在整个过程中软件和硬件同时设计,并且实现了DSP从设计到实现功能的无缝集成,大大缩短了...
recommend-type

一篇不错的缺陷检测文章附详细代码-缺陷检测 CL.doc

一篇不错的缺陷检测文章附详细代码-缺陷检测 CL.doc 看附件,是关于苹果特征提取和缺陷检测的,我正巧在做,里面的代码验证过了,无误。上传上来,有需要的看看。:lol
recommend-type

zigbee-cluster-library-specification

最新的zigbee-cluster-library-specification说明文档。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

实现实时数据湖架构:Kafka与Hive集成

![实现实时数据湖架构:Kafka与Hive集成](https://img-blog.csdnimg.cn/img_convert/10eb2e6972b3b6086286fc64c0b3ee41.jpeg) # 1. 实时数据湖架构概述** 实时数据湖是一种现代数据管理架构,它允许企业以低延迟的方式收集、存储和处理大量数据。与传统数据仓库不同,实时数据湖不依赖于预先定义的模式,而是采用灵活的架构,可以处理各种数据类型和格式。这种架构为企业提供了以下优势: - **实时洞察:**实时数据湖允许企业访问最新的数据,从而做出更明智的决策。 - **数据民主化:**实时数据湖使各种利益相关者都可
recommend-type

SPDK_NVMF_DISCOVERY_NQN是什么 有什么作用

SPDK_NVMF_DISCOVERY_NQN 是 SPDK (Storage Performance Development Kit) 中用于查询 NVMf (Non-Volatile Memory express over Fabrics) 存储设备名称的协议。NVMf 是一种基于网络的存储协议,可用于连接远程非易失性内存存储器。 SPDK_NVMF_DISCOVERY_NQN 的作用是让存储应用程序能够通过 SPDK 查询 NVMf 存储设备的名称,以便能够访问这些存储设备。通过查询 NVMf 存储设备名称,存储应用程序可以获取必要的信息,例如存储设备的IP地址、端口号、名称等,以便能
recommend-type

JSBSim Reference Manual

JSBSim参考手册,其中包含JSBSim简介,JSBSim配置文件xml的编写语法,编程手册以及一些应用实例等。其中有部分内容还没有写完,估计有生之年很难看到完整版了,但是内容还是很有参考价值的。
recommend-type

"互动学习:行动中的多样性与论文攻读经历"

多样性她- 事实上SCI NCES你的时间表ECOLEDO C Tora SC和NCESPOUR l’Ingén学习互动,互动学习以行动为中心的强化学习学会互动,互动学习,以行动为中心的强化学习计算机科学博士论文于2021年9月28日在Villeneuve d'Asq公开支持马修·瑟林评审团主席法布里斯·勒菲弗尔阿维尼翁大学教授论文指导奥利维尔·皮耶昆谷歌研究教授:智囊团论文联合主任菲利普·普雷教授,大学。里尔/CRISTAL/因里亚报告员奥利维耶·西格德索邦大学报告员卢多维奇·德诺耶教授,Facebook /索邦大学审查员越南圣迈IMT Atlantic高级讲师邀请弗洛里安·斯特鲁布博士,Deepmind对于那些及时看到自己错误的人...3谢谢你首先,我要感谢我的两位博士生导师Olivier和Philippe。奥利维尔,"站在巨人的肩膀上"这句话对你来说完全有意义了。从科学上讲,你知道在这篇论文的(许多)错误中,你是我可以依
recommend-type

实现实时监控告警系统:Kafka与Grafana整合

![实现实时监控告警系统:Kafka与Grafana整合](https://imgconvert.csdnimg.cn/aHR0cHM6Ly9tbWJpei5xcGljLmNuL21tYml6X2pwZy9BVldpY3ladXVDbEZpY1pLWmw2bUVaWXFUcEdLT1VDdkxRSmQxZXB5R1lxaWNlUjA2c0hFek5Qc3FyRktudFF1VDMxQVl3QTRXV2lhSWFRMEFRc0I1cW1ZOGcvNjQw?x-oss-process=image/format,png) # 1.1 Kafka集群架构 Kafka集群由多个称为代理的服务器组成,这
recommend-type

Windows 运行Python脚本

要在 Windows 上运行 Python 脚本,你需要先安装 Python。可以从官网下载 Python 安装包并按照提示进行安装。安装完成后,就可以在命令行中输入 `python` 命令,进入 Python 解释器环境。 接着,你可以编写 Python 脚本,保存为 `.py` 后缀的文件。在命令行中进入脚本所在的目录,输入 `python script.py` 命令来运行脚本。其中 `script.py` 是你的脚本文件名。 如果你想在 Windows 上运行一个 Python 程序,但不想打开命令行窗口,可以将脚本文件拖动到 Python 可执行文件 `python.exe` 上,