编辑框和位图按钮的特殊结合

编辑框和位图按钮的特殊结合

山东省沾化县人民医院信息科(256800)---李强

Delphi编程已成为现代编程的一个热门，很多程序员喜欢用delphi写程序。可在delphi编程中，会遇到很多意想不到的问题，现将我在编程中遇到的一个经验供大家参考：

新建一窗体form1，在该窗体上建立edit1,edit2两个编辑框，bitbtn1一个位图按钮，edit1、edit2的text属性为空，edit1的keypress程序段中写入：If  key=#13 then  edit2.text:=´edit1有效´，bitbtn1的onclick 程序段中写入：edit2.text:=´edit1无效´  ，运行程序时，在edit1编辑框中按回车，则edit2编辑框中显示“edit1有效”；按bitbtn1按钮，edit2编辑框中显示“edit1无效”。

在做完以上操作时，将bitbtn1（位图按钮）的kind属性卡中选择bkok ，则bitbtn1上会有一个绿色的对号出现，这时在edit1上按回车，会出现一种特殊的情况：edit2编辑框中显示“edit1无效”，这正是bitbtn1按钮的所执行的命令，而edit1中的命令无效了。无论你在edit1编辑框中的keypress设定什么样的命令或程序段，都不起作用，在回车确认时，都会自动的执行bitbtn1按钮中的命令。有时，大家为使界面友好，会将位图按钮的kind属性改变，可这样会使同一窗体上的所有edit编辑框的keypress程序段失效，在编辑框上回车时，都会执行位图按钮的onclick命令！

读者不妨试一下，以免在编程中发生类似情况时，能及时改正！