procedure Edit1KeyPress(Sender: TObject; var Key: Char);
解决方案 »
- RzDBGrid使用问题,无法响应DrawDataCell事件
- 大家来看看我的软件(AutoFlowchart,根据源码自动生成流程图!)
- 请问如何将整型时间转换为yyyymmdd的时间格式
- 在学校bbs上看到一份兼职,找了之后发现很奇怪啊,大家遇到过么?哈
- 一个关于临界区的问题
- 无法启动应用程序。工作组信息文件丢失,或是已被其它用户独占式打开
- 最近,我突然对delphi有了很大兴趣,想好好学习,但不知从哪里下手??
- 为什么在安装了BCB6之后Delphi6的某些包在Delphi启动时不能加载?
- ado更新sql server库的问题
- 如何取得一个String型单字符的ASC码?
- 江湖告急:如何实现无纸化考试系统????
- 关于 ADO 的问题?
字符型:
在edit的KeyPress事件中,放入查询代码:
//先进行有效性检查
With Query1 do
Close;
SQL.Text:='select * from Da where bh like '+''''+Trim(edit1.Text)+'''%''';
Open;
end;