注册 登录
编程论坛 Delphi论坛

初学者请教

城镇农民 发布于 2007-12-10 12:13, 1318 次点击
做一个计算器的程序,其中用退格删最后一个字符的代码是:   
  Edit1.SetFocus;   
  Edit1.SelStart   :=   Length(Edit1.Text);   
  Edit1.Perform(WM_CHAR,   VK_BACK,0);

但没看懂?哪位能给解释一下,这段代码是如何实现退格功能的。谢了。
2 回复
#2
happybaby402007-12-10 16:41
连接数据库
[求助] 各位论坛朋友们请问Delphi与SQL 两者之间要怎么连接啊....?????
比如说要开发一个数据库,delphi作为开发平台..SQL作为后台....那两者要如何连接啊....???/
#3
sky_yang_sky2007-12-10 17:10
原帖由 [bold][underline]城镇农民[/underline][/bold] 于 2007-12-10 12:13 发表 [url=http://bbs.bc-cn.net/redirect.php?goto=findpost&pid=1141001&ptid=191510][/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]]
1