社区
Delphi
帖子详情
关于TMemo控件的小问题
jaexc
2003-08-24 07:09:27
最近用TMemo写了一个记事本,整好才发现在编辑时不能使用DEL键,没什么反映。这是为什么的呢,怎么解决呢,主要是我不想用TRichEdit.
...全文
63
5
打赏
收藏
关于TMemo控件的小问题
最近用TMemo写了一个记事本,整好才发现在编辑时不能使用DEL键,没什么反映。这是为什么的呢,怎么解决呢,主要是我不想用TRichEdit.
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
sduzjw
2003-08-25
打赏
举报
回复
onkeypress中写上代码判断是不是DEL键按下了
jaexc
2003-08-25
打赏
举报
回复
放心吧,键盘肯定没坏。大家去试那MS自带的记事本就可以DEL。
TO: sixgj(轰炸机) 你的建议很好,我是初学不久,能告诉我怎样删除当前光标后一个字符呢?
renzy205
2003-08-25
打赏
举报
回复
const
Empty: PChar = '';
SendMessage(Memo.Handle, EM_SETSEL, SelStart, SelStart+1);
SendMessage(Memo.Handle, EM_REPLACESEL, 0, Longint(''));
madyak
2003-08-24
打赏
举报
回复
不是键盘坏了吧!
是不是小键盘锁了?
用Delete键(不是Del)试试!
sixgj
2003-08-24
打赏
举报
回复
呵呵。写del键的onkeypress事件啊。
Delphi
TMemo
字符串的查找完全实现
这是早上传的发现有
问题
不能在Delphi Xe5中运行 但能在Delphi7中运行 我想删除它也没权限 http://download.csdn.net/detail/teststudio/6404077 所以重传下 Delphi
TMemo
字符串的查找完全实现 已经完全的解决Delphi
TMemo
的查找对话框 和 替换对话框 功能 的所有功能 查看 GIF http://images.cnblogs.com/cnblogs_com/xe2011/524919/o_TFindDialog.gif
Delphi专业 界面
控件
Skin++ For Delphi (一)
大家用惯了BSskin和VCLskin,但是这个跟专业! 支持的开发语言 Borland Delphi 4/5/6 Borland Delphi 7 Borland Delphi 8 Borland Delphi 2005 Borland Delphi 2006 CodeGear Delphi 2007 支持的操作系统 Windows Vista Wndows 2000/XP/2003 Windows NT4.0 Windows Me Windows 98/98SE Windows 95 版本信息 当前版本:3.0 文件大小:24.9MB 更新日期:2006-12-6 下载次数:22670 软件概述 Skin++ For Delphi目前全面支持Delphi4、Delphi5、Delphi6、Delphi7、Delphi8、Delphi2005、Delphi2006。 迄今为止,Delphi支持4种类型的应用程序: 1、VCL Forms Application – Delphi for Win32 (该类型在Delphi4/5/6/7/2005/2006所有版本包含); 2、VCL Forms Application – Delphi for .Net (该类型在Delphi8/2005/2006中包含); 3、Windows Forms Application – C# Builder (该类型在Delphi2005/2006中包含); 4、Windows Forms Application – Delphi for .Net (该类型在Delphi8/2005/2006中包含)。 Skin++对以上4种Delphi程序类型做了全面的支持。 试用版本描述与运行截图 1.在本安装盘中,包含了Delphi的各个版本(D6,D7,D8,D2005,D2006)Skin++测试例子; 2.关于如何使用Skin++,请参考文档《Skin++ For Delphi [All Edition]使用帮助》; 3.要查询Skin++所有的接口,请参考文档《Skin++接口描述》; 4.本安装盘提供一套试用皮肤PixOS.ssk,正式版用户将获得网站上更多更精美的皮肤。并可获得定期更新; 5.Skin++正式版中提供强大的皮肤设计工具Skin++Builder。 该工具完成皮肤所有的设计工作,并可以全自动导入Windows主题、第三方主题; Skin++Builder使用详情请参考《Skin++Builder Help》; 6.案例说明: 我们以Delphi2006 VCL Win32的测试例子为例,描述其组成。 打开\Delphi 2006\VCL Forms Application - Delphi For Win32\目录中的MDIAPP.exe 该例子是一个MDI类型的程序。主窗口部分演示Skin++在MDI方面处理的各个细节。 如:主菜单条、主弹出菜单、系统菜单、工具条、状态条、MDI客户区、MDI子窗口、MDI子窗口最大化后等各个部分的换肤细节。 Skin++ 3.0 可以对皮肤进行动态的色调设置 这个功能可以使您的程序可以瞬间拥有N套色调的皮肤。 更改色调样例1: 我们分以下几个页面对Delphi的全部
控件
进行了演示: Buttons、Static、Controls with ScrollBar(带滚动条的
控件
)、Splitter、TabControls、TrackBar & Progress、Misc Controls、Dialog、DataControls 6.1 Buttons 该部分我们演示了Skin++对Delphi的各种类型的按钮进行的换肤支持, 包括BitBtn按钮、SpeedButton、Tbutton、CheckBox、RadioBox 在该部分,还演示了对按钮进行多风格的换肤效果,“Style 2”按钮和其他按钮不同,呈现了其特有样式。 这种效果一般用在网络电话、多媒体软件、网络聊天等需要同时支持多种按钮风格的地方。 每个按钮具有其固定的5中状态:正常、按下、高量、禁用、默认。在该窗体中演示了每种按钮的5中状态。 并且在Skin++ 3.0 中,支持Focus的效果。通过Tab或方向键可以看到焦点在每个按钮上移动。 6.2 Static 该部分演示了Skin++ 对Label、GroupBox、右键菜单、Panel、FlowPanel、GridPanel等
控件
的支持。 值得一提的是,Skin++对Label的支持是彻底,并且不像其他的换肤软件需要在窗体上放置一个
Source Editor Component (代码编辑器
控件
)
TSourceEdit是一个代码编辑器
控件
,支持DELPHI语法高亮,基于
TMemo
组件。 Delphi7编译通过。
Delphi 7.0 得到Memo中的可见行数.rar
Delphi 7.0 获取Memo
控件
中字符的可见行数,没讲 时在Memo
控件
中随便粘贴入一些字符,单击窗口中的“检测可见行数”按钮,即可得到该文本框
控件
中字符的行数,将这一系列执行命令集成在delphi的按钮监听事件中,编写如下代码即可: function LinesVisible(Memo:
TMemo
): integer; Var OldFont : HFont; Hand : THandle; TM : TTextMetric; Rect : TRect; tempint : integer; begin Hand := GetDC(Memo.Handle); try GetTextMetrics(Hand, TM); Memo.Perform(EM_GETRECT, 0, longint(@Rect)); tempint := (Rect.Bottom - Rect.Top) div Memo.Font.Height div -1; finally ReleaseDC(Memo.Handle, Hand); end; Result := tempint; end; procedure TForm1.BitBtn1Click(Sender: TObject); begin bitbtn1.Caption:='可见[' IntToStr(LinesVisible(Memo1)) ']行'; end; 程序运行效果请参见截图所示,完整源码请下载。
Delphi动态生成常用的窗体
控件
.rar
Delphi动态生成一些常用 的窗体
控件
,比如生成 TButton、TEditor、TListBox、
TMemo
等,点击对应的按钮,即可生成对应的
控件
类型,刚开始打开程序时,窗口中并无这些
控件
。在运行的窗口中,你可以尝试这些操作,生成相关常用的组件试试。
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章