ONCLICK中的SENDER應該設置一下。button1.onclilk(edit1)或乾脆用SQL語句實現.select * from db where '班级='''+edit1.text+'''';
解决方案 »
- 请问一般把VC中的类编程delphi中的类会有哪些注意事项?
- Delphi数据库更新问题~~~
- ACCESS数据库有没有导入数据的功能啊,(我1000条数据不知道这么存进去!)
- delphi 在导出数据到excel 时,怎样才能不受鼠标的干扰
- 寻合作伙伴,要求擅长串口通讯.
- 请大家给个思路:浏览器IE 与 自己的一个 exe 应用程序的通信
- TFileStream简单问题
- 要让以下的代码在delphi下执行,应uses哪个dcu文件?谢谢指教!!!
- 数据转移的问题!
- DBTreeview建树问题,知道TDBTreeView component 的高手请进
- 我是琳琳,刚才提问有关音量问题的人。如果用一个TrackBar控制左右音道如何解决?
- 怎么让用户只能在文本框中输入考试得分,如89.5、60.5?怎么判断一个字符串是否只包含数字字符?
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=VK_RETURN then
button1.click;end;procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage('kdfj');
end;