需要一个从TMemo派生的组件(不是TSyn组件)
我需要在TMemo的左侧(内部或外部)放置一条线,其厚度(可选)和颜色可以仅出于指示目的而进行控制。它不必充当装订线的功能,而是看起来特别像SynMemo那样,如图所示。SynMemo的问题在于它不支持Tahoma这样的可变宽度字体,而TMemo却支持。
我尝试通过将TShape与TMemo结合使用,甚至通过在TSynMemo上叠加TMemo来使用CustomContainersPack制作一些复合组件,但是由于拖拽时的绘画效果使得它看起来像是在拆卸,CCPack对于我的IDE并不那么健壮。
安装了KMemo,JvMemo和许多其他Torry.net组件,并检查了是否有隐藏的支持来实现相同的功能,但没有任何功能。
对于我来说,将组件分组到一起并不是一个解决方案,因为许多鼠标事件与备忘录相关,并且对FindVCLWindow的调用将返回鼠标下更改的组件。此外,将需要许多组件,因此与TPanel分组会增加内存使用量。
无论取代100(dwData)的正值是什么,都会向上滚动而不是向下滚动.负值显示错误.D7帮助(我在XE2上)说了一些关于负值和NT的东西.如果这个功能对于XP来说太旧了,请提出一些替代解决方案.
procedure TMainform.tmr1Timer(Sender: TObject);
begin
mouse_event(MOUSEEVENTF_WHEEL, 0, 0, 100, 0);
end;
Run Code Online (Sandbox Code Playgroud) 我正在尝试执行以下操作.它工作但cmd窗口等待acrobat.exe在退出之前完成执行.我必须使用这种启动方法,因为我打算将来传递某些命令行参数.
cmdLineString := Format('/c ""%s" "%s""',['C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\Acrobat.exe', 'F:\Android-interview\Packt.Android.3.0.Application.Development.Cookbook.Jul.2011.ISBN.1849512949.pdf']);
ShellExecute(Handle, 'open', 'cmd.exe', PChar(CmdLineString), nil, SW_SHOWNORMAL);
Run Code Online (Sandbox Code Playgroud)