初学者请教 - Delphi论坛 - 编程论坛档案馆

编程论坛 → 开发语言 → 『 Delphi论坛』 → 初学者请教

标题：初学者请教

只看楼主

城镇农民

等　级：新手上路
帖　子：15
专家分：0
注　册：2007-11-12

楼主

问题点数：0 回复次数：2

初学者请教

做一个计算器的程序，其中用退格删最后一个字符的代码是：
  Edit1.SetFocus;
  Edit1.SelStart   :=   Length(Edit1.Text);
  Edit1.Perform(WM_CHAR,   VK_BACK,0);

但没看懂？哪位能给解释一下，这段代码是如何实现退格功能的。谢了。

搜索更多相关主题的帖子: BACK　Length　计算器　

2007-12-10 12:13

happybaby40

等　级：新手上路
帖　子：29
专家分：0
注　册：2007-11-21

第 2 楼

得分:0

连接数据库

[求助] 各位论坛朋友们请问Delphi与SQL 两者之间要怎么连接啊....?????
比如说要开发一个数据库,delphi作为开发平台..SQL作为后台....那两者要如何连接啊....???/

2007-12-10 16:41

sky_yang_sky

等　级：论坛游民
威　望：8
帖　子：481
专家分：16
注　册：2007-5-30

第 3 楼

得分:0

原帖由 [bold][underline]城镇农民[/underline][/bold] 于 2007-12-10 12:13 发表 [url=http://bbs.]

[/url]
做一个计算器的程序，其中用退格删最后一个字符的代码是：
Edit1.SetFocus;  //將光標定位在EDIT1控件中
Edit1.SelStart   :=   Length(Edit1.Text); //設置光標初始位置在EDIT1文本的最后
Edit1.Perform(WM_CHAR,   VK_BACK,0);//實現backspace的功能，按一下鍵就刪除一個字符
但没看懂？哪位能给解释一下，这段代码是如何 ...

[[italic] 本帖最后由 sky_yang_sky 于 2007-12-10 17:12 编辑 [/italic]]

你微笑的面對整個世界，整個世界也將會微笑的面對你。

2007-12-10 17:10

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-191510-1-1.html