求助!!!关于checkbox1的使用
我想把checkbox1表示的信息用insert插入到数据库中应该怎么用!! 还有一个combobox控件的就是我要显示combobox选中的数据限定下的数据库信息应该怎么使用!!
我用下面代码怎么不行啊!希望大哥帮忙。。
procedure TForm3.ComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
dm1.ADOQuery1.SQL.Text:='select * from jqjs where jfjs_bh='''+trim(combobox1.Text)+'''';
dm1.ADOQuery1.Open;
end; -----------------------------------------
我想把checkbox1表示的信息用insert插入到数据库中应该怎么用!! 还有一个combobox控件的就是我要显示combobox选中的数据限定下的数据库信息应该怎么使用!!
我用下面代码怎么不行啊!希望大哥帮忙。。
procedure TForm3.ComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
dm1.ADOQuery1.SQL.Text:='select * from jqjs where jfjs_bh='''+trim(combobox1.Text)+'''';
dm1.ADOQuery1.Open;
end; -----------------------------------------
解决方案 »
- d7 +ZEOS 连接postgresq 怪问题!
- 第一个百分帖.....
- 控件SPComm的异常如何处理
- 请指教自定义打印机需要那些控件?
- 用API画线时如何设置画线的模式(XOR、AND、OR等)
- 急急急。。。。请问,COM组件返回字符串时,用什么类型。在线等待
- Borland公司为什么不做一个Builder studio ,把 Delphi(Delphi.net(Delphi8.0)), JBuilder, C++Builder, C#Builder
- 急急急急急急急急急急急急急急急急 :用QRMemo打印分不了页????????????,,,帮手!
- dbexpress中的控件是干什么用的,和一般的数据控件相比有什么不同?
- xe3下的rsa算法
- 如何使用delphi的帮助?关于方法论的讨论!!!!!!!!!!!!!!!
- 窗口初始化时运行过程代码加在哪,在哪调用?
可以if checkbox1.checked then
用1代替
不是则未0
2试试
dm1.ADOQuery1.SQL.Text:=format('select * from jqjs where jfjs_bh=''%s''',[trim(combobox1.Text)]);
begin后面再加上一句:
dm.ADOQuery1.Close;
不过,如果combobox1没有选择(即ItemIndex=-1)时会报错, 你需要先判断一下
已经试过可是依然没反映。同时 yjs_lh(长风浪子) 说的判断怎么弄。能纤细点吗?
dm1.ADOQuery1.SQL.Add('select * from jqjs where jfjs_bh='''+trim(combobox1.Text)+'''';
dm1.ADOQuery1.Open;这几句话不能写在keypress事件里,不如你敲一下键盘就执行一次了
写在onclick或者onchange事件里