请教如何修改ComCtrls.pas使菜单的自动快捷键消灭

andylife 2004-09-30 07:19:45
我看过修改ComCtrls.pas 的一个if 语句就可以解决

不是用 AutoHotKeys := maManual 这个方法........


请看过的朋友指教
...全文
90 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
andylife 2004-10-06
  • 打赏
  • 举报
 回复
真的没有人会?????
andylife 2004-09-30
  • 打赏
  • 举报
 回复
不是真的吧......没有人看过
不用第三方控件，让richEdit支持图片与表格换行
找到richEdit控件所在单元ComCtrls.pas (在SOURCE\VCL) //第一步 procedure TCustomRichEdit.CreateParams(var Params: TCreateParams); const // RichEditModuleName = 'RICHED32.DLL';//原来语句 // ...
listview 控件技巧
interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = class(TForm) ListView1: TListView; Button1: TButton; procedure Button...
delphi制作字幕滚动窗体.rar
StdCtrls, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Timer1: TTimer; Edit1: TEdit; Button3: TButton; Button2: TButton; TrackBar1: TTrackBar; Panel1: TPanel; Label1: TLabel; Label2: ...
DELPHI搜索文件的示例
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls, Vcl.ExtCtrls; type TForm1 = class(TForm) ListBox1: TListBox; Memo2: TMemo; Panel1: TPanel; Label1: TLabel; Label2: TLabel; ...
Delphi多条件检索代码实例.rar
//还需要引用ComCtrls单元以供Tlistitem调用 　procedure TeForm.S1Click(Sender: TObject); 　var myitem: Tlistitem; i: integer; s: string; 　begin 　Application.CreateForm(Tiform, iform); 　//以下是...
Delphi

5,392

社区成员

262,732

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章