RichEdit control有这个非常烦人的功能。每当用户试图将光标移过它的“终点”时,它就会发出哔哔声。例如,您可以使用 WordPad 对其进行测试这也实现了 RICHEDIT。打开它,输入一些文字,然后点击Home。 key 。如果光标不在行首:
点击 Home键将它移到那里,但随后点击 Home再次按键会发出此蜂鸣声。
乍一看好像是重写了WM_KEYDOWN和 WM_KEYUP消息并阻止 RICHEDIT 可以发出哔哔声的情况是一个解决方案……直到我真正开始实现它。不幸的是,它并不像听起来那么简单,因为在很多情况下该控件都会发出哔哔声!因此,我的击键阻止代码确实膨胀到 300 多行,而且我仍然看到有一些我没有考虑到的按键,或者更糟的是,我可能已经覆盖了一些有用的行为。 (阅读下文了解更多详情。)
然后我决定深入了解 RICHEDIT 控件本身的实现。果然,例如,如果我们看一下 Home 的实现按键,C:\WINDOWS\SysWOW64\msftedit.dll在我的 Windows 10 操作系统上,有一个名为 ?Home@CTxtSelection@@QAEHHH@Z 的函数(或 public: int __thiscall CTxtSelection::Home(int,int) demangled)在映射偏移 0x3FC00 ,即硬编码调用 MessageBeep (MB_OK),或者正是我要消除的东西:
如果您查看地址 0x6B64FD38在上面的屏幕截图中,有一种内置的方法可以绕过它,看起来是标志 0x800 .
所以深入研究了msftedit.dll再多一点,似乎有一个名为 ?OnAllowBeep@CTxtEdit@@QAEJH@Z 的函数(或 public: long __thiscall CTxtEdit::OnAllowBeep(int) demangled)可以修改此标志:
经过更多研究,我发现RICHEDIT 控件中内置了COM 接口(interface),例如ITextServices。和 ITextHost将该标志引用为 TXTBIT_ALLOWBEEP在 ITextServices::OnTxPropertyBitsChange 方法。
不幸的是,我似乎无法找到直接更改 TXTBIT_ALLOWBEEP 的方法标志(COM 不是我的强项。)我尝试研究实现 ITextHost , 但它有很多虚方法与我想要实现的目标无关,我不知道如何实现。
有没有人知道如何清除 TXTBIT_ALLOWBEEP旗帜?
附言。这就是为什么我没有走覆盖按键的路线:
只是给你举个例子。说,如果我重写 VK_HOME按键。我需要确保光标不在行的开头,而且没有选择。然而,我需要确保 Ctrl当光标位于窗口的最顶部时,键没有按下。然后与Shift相同 key ,我什至不确定是什么 Alt用它做......等等。哦,这只是 Home key 。还有上、下、左、右、PageUp、PageDown、End、Delete、Backspace。 (这就是我所知道的。可能还有更多,而且我什至没有谈论 IME 或其他键盘布局等)换句话说,它变得一团糟!
因此,最终我意识到预测击键不是要走的路。
最佳答案
首先我们需要发送EM_GETOLEINTERFACE发送到 rich edit 窗口的消息 - 这是检索 IRichEditOle 对象,客户端可以使用该对象访问 rich edit 控件的组件对象模型 (COM) 功能。
然后检索 ITextServices指针,在 EM_GETOLEINTERFACE 返回的私有(private) IUnknown 指针上调用 QueryInterface .
这里存在有趣的一点 - IID_ITextServices 不是众所周知但需要在运行时从 Msftedit.dll 获取
来自 About Windowless Rich Edit Controls
Msftedit.dll exports an interface identifier (IID) called IID_ITextServices that you can use to query the IUnknown pointer for the ITextServices interface.
在我们得到ITextServices之后指针 - 我们可以调用 OnTxPropertyBitsChange使用 TXTBIT_ALLOWBEEP 掩码
代码示例:
#include <textserv.h>
if (HMODULE hmodRichEdit = LoadLibrary(L"Msftedit.dll"))
{
// create richedit window
if (HWND hwndRich = CreateWindowExW(0, MSFTEDIT_CLASS, ...))
{
if (IID* pIID_ITS = (IID*) GetProcAddress(hmodRichEdit, "IID_ITextServices"))
{
IUnknown* pUnk;
if (SendMessageW(hwndRich, EM_GETOLEINTERFACE, 0, (LPARAM)&pUnk))
{
ITextServices* pTxtSrv;
HRESULT hr = pUnk->QueryInterface(*pIID_ITS, (void**)&pTxtSrv);
pUnk->Release();
if (0 <= hr)
{
pTxtSrv->OnTxPropertyBitsChange(TXTBIT_ALLOWBEEP, 0);
pTxtSrv->Release();
}
}
}
}
}
关于c++ - 如何消除 RICHEDIT 控件的 MessageBeep?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/55884687/
我正在学习如何使用Nokogiri,根据这段代码我遇到了一些问题:require'rubygems'require'mechanize'post_agent=WWW::Mechanize.newpost_page=post_agent.get('http://www.vbulletin.org/forum/showthread.php?t=230708')puts"\nabsolutepathwithtbodygivesnil"putspost_page.parser.xpath('/html/body/div/div/div/div/div/table/tbody/tr/td/div
总的来说,我对ruby还比较陌生,我正在为我正在创建的对象编写一些rspec测试用例。许多测试用例都非常基础,我只是想确保正确填充和返回值。我想知道是否有办法使用循环结构来执行此操作。不必为我要测试的每个方法都设置一个assertEquals。例如:describeitem,"TestingtheItem"doit"willhaveanullvaluetostart"doitem=Item.new#HereIcoulddotheitem.name.shouldbe_nil#thenIcoulddoitem.category.shouldbe_nilendend但我想要一些方法来使用
关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题?更新问题,以便editingthispost可以用事实和引用来回答它.关闭4年前。Improvethisquestion我想在固定时间创建一系列低音和高音调的哔哔声。例如:在150毫秒时发出高音调的蜂鸣声在151毫秒时发出低音调的蜂鸣声200毫秒时发出低音调的蜂鸣声250毫秒的高音调蜂鸣声有没有办法在Ruby或Python中做到这一点?我真的不在乎输出编码是什么(.wav、.mp3、.ogg等等),但我确实想创建一个输出文件。
给定这段代码defcreate@upgrades=User.update_all(["role=?","upgraded"],:id=>params[:upgrade])redirect_toadmin_upgrades_path,:notice=>"Successfullyupgradeduser."end我如何在该操作中实际验证它们是否已保存或未重定向到适当的页面和消息? 最佳答案 在Rails3中,update_all不返回任何有意义的信息,除了已更新的记录数(这可能取决于您的DBMS是否返回该信息)。http://ar.ru
我在我的项目目录中完成了compasscreate.和compassinitrails。几个问题:我已将我的.sass文件放在public/stylesheets中。这是放置它们的正确位置吗?当我运行compasswatch时,它不会自动编译这些.sass文件。我必须手动指定文件:compasswatchpublic/stylesheets/myfile.sass等。如何让它自动运行?文件ie.css、print.css和screen.css已放在stylesheets/compiled。如何在编译后不让它们重新出现的情况下删除它们?我自己编译的.sass文件编译成compiled/t
我正在寻找执行以下操作的正确语法(在Perl、Shell或Ruby中):#variabletoaccessthedatalinesappendedasafileEND_OF_SCRIPT_MARKERrawdatastartshereanditcontinues. 最佳答案 Perl用__DATA__做这个:#!/usr/bin/perlusestrict;usewarnings;while(){print;}__DATA__Texttoprintgoeshere 关于ruby-如何将脚
Rackup通过Rack的默认处理程序成功运行任何Rack应用程序。例如:classRackAppdefcall(environment)['200',{'Content-Type'=>'text/html'},["Helloworld"]]endendrunRackApp.new但是当最后一行更改为使用Rack的内置CGI处理程序时,rackup给出“NoMethodErrorat/undefinedmethod`call'fornil:NilClass”:Rack::Handler::CGI.runRackApp.newRack的其他内置处理程序也提出了同样的反对意见。例如Rack
在选择我想要运行操作的频率时,唯一的选项是“每天”、“每小时”和“每10分钟”。谢谢!我想为我的Rails3.1应用程序运行调度程序。 最佳答案 这不是一个优雅的解决方案,但您可以安排它每天运行,并在实际开始工作之前检查日期是否为当月的第一天。 关于ruby-如何每月在Heroku运行一次Scheduler插件?,我们在StackOverflow上找到一个类似的问题: https://stackoverflow.com/questions/8692687/
我有一个对象has_many应呈现为xml的子对象。这不是问题。我的问题是我创建了一个Hash包含此数据,就像解析器需要它一样。但是rails自动将整个文件包含在.........我需要摆脱type="array"和我该如何处理?我没有在文档中找到任何内容。 最佳答案 我遇到了同样的问题;这是我的XML:我在用这个:entries.to_xml将散列数据转换为XML,但这会将条目的数据包装到中所以我修改了:entries.to_xml(root:"Contacts")但这仍然将转换后的XML包装在“联系人”中,将我的XML代码修改为
我有一大串格式化数据(例如JSON),我想使用Psychinruby同时保留格式转储到YAML。基本上,我希望JSON使用literalstyle出现在YAML中:---json:|{"page":1,"results":["item","another"],"total_pages":0}但是,当我使用YAML.dump时,它不使用文字样式。我得到这样的东西:---json:!"{\n\"page\":1,\n\"results\":[\n\"item\",\"another\"\n],\n\"total_pages\":0\n}\n"我如何告诉Psych以想要的样式转储标量?解