delphi – 为TMemo或TRichEdit组件添加intellimouse支持

发布时间：2020-12-15 09:06:11 所属栏目：大数据来源：网络整理

导读：我如何为TMemo或TRichEdit组件添加 intellimouse支持我正在使用Delphi XE 解决方法必须将 ScrollBars 属性设置为ssHorizo??ntal,ssVertical或ssBoth,并将 IMouse 单元添加到项目中. UPDATE 为避免IMouse单元导致的内存泄漏,必须在应用程序退出之前添加此代

我如何为TMemo或TRichEdit组件添加 intellimouse支持

我正在使用Delphi XE

解决方法

必须将 ScrollBars属性设置为ssHorizo??ntal,ssVertical或ssBoth,并将 IMouse单元添加到项目中.

UPDATE

为避免IMouse单元导致的内存泄漏,必须在应用程序退出之前添加此代码(例如,在主单元的最终部分中).

if Assigned(Mouse.PanningWindow) then
    Mouse.PanningWindow := nil;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!