|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 Delphi论坛 』
→ Delphi写简单计算器删掉一个字符的按键怎么实现,求指教!!
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
582
人关注过本帖
标题:
Delphi写简单计算器删掉一个字符的按键怎么实现,求指教!!
只看楼主
加入收藏
nick_ping
等 级:
新手上路
帖 子:5
专家分:0
注 册:2013-2-27
结帖率:
0
楼主
收藏
已结贴
√
问题点数:20 回复次数:6
Delphi写简单计算器删掉一个字符的按键怎么实现,求指教!!
退格的代码
procedure TForm1.Button18Click(Sender: TObject);
begin
PostMessage(edit1.Handle,WM_CHAR,VK_BACK,0);
end;
这个一下全部删掉了,只退一个字符要怎么破啊,感激不尽!!!
[
本帖最后由 nick_ping 于 2013-2-28 15:39 编辑
]
搜索更多相关主题的帖子:
计算器
procedure
2013-02-28 15:29
举报帖子
使用道具
赠送鲜花
nick_ping
等 级:
新手上路
帖 子:5
专家分:0
注 册:2013-2-27
第
2
楼
收藏
得分:0
速求各路好汉支援,感激不尽!!
2013-02-28 15:30
举报帖子
使用道具
赠送鲜花
nick_ping
等 级:
新手上路
帖 子:5
专家分:0
注 册:2013-2-27
第
3
楼
收藏
得分:0
回复的人好少
2013-02-28 15:53
举报帖子
使用道具
赠送鲜花
wp231957
来 自:神界
等 级:
贵宾
威 望:
423
帖 子:13688
专家分:53332
注 册:2012-10-18
第
4
楼
收藏
得分:5
我这里测试没问题啊
PostMessage(edit1.Handle,WM_CHAR,VK_BACK,0);
DO IT YOURSELF !
2013-03-01 08:51
举报帖子
使用道具
赠送鲜花
余姚威尔
等 级:
业余侠客
威 望:
2
帖 子:61
专家分:219
注 册:2012-11-27
第
5
楼
收藏
得分:5
人烟稀少···
2013-03-01 14:53
举报帖子
使用道具
赠送鲜花
mayanzs
等 级:
版主
威 望:
5
帖 子:30
专家分:105
注 册:2013-2-3
第
6
楼
收藏
得分:5
被全部删除掉估计是你的edit1中文本被全选了,可以在删除前先取消选择:
edit1.SelStart:=Length(edit1.Text);
edit1.SelLength:=1;
然后再
PostMessage(edit1.Handle,WM_CHAR,VK_BACK,0);
就可以了。
2013-03-01 22:21
举报帖子
使用道具
赠送鲜花
zjl15159440
等 级:
新手上路
帖 子:2
专家分:9
注 册:2013-3-4
第
7
楼
收藏
得分:5
edit1.Text:=copy(edit1.Text,1,length(trim(edit1.Text))-1);
2013-03-04 16:08
举报帖子
使用道具
赠送鲜花
7
1/1页
1
快速回复:
Delphi写简单计算器删掉一个字符的按键怎么实现,求指教!!
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.025764 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved