procedure TForm1.B_appeClick(Sender: TObject);
begin
With Add_Q do
begin
Close;
SQL.Clear;
SQL.Add('Select * From User_pass');
SQL.Add('Where User_pass.ID="'+lid.Text+'"');
Execsql;
// User_Table1.Refresh;
end;
With User_Table1 do
begin
Open;
Refresh;
end;我用的是DBGRID控件。但是我用了 SQL.Add('Select * From User_pass');
SQL.Add('Where User_pass.ID="'+lid.Text+'"');
但是在DBGRID里面没动静。按我想的来说,应该过滤出満足lid.Text里的内容呀!
数据指针应该要指到満足Lib.Text的内容上呀!
可是就是没变呀。好像什么也没执行一样(还是指向第一条记录)。
我要怎么做?才能満足lid.Text里的内容显示在DBGRID里呀?
请各位帮助一下OK?
begin
With Add_Q do
begin
Close;
SQL.Clear;
SQL.Add('Select * From User_pass');
SQL.Add('Where User_pass.ID="'+lid.Text+'"');
Execsql;
// User_Table1.Refresh;
end;
With User_Table1 do
begin
Open;
Refresh;
end;我用的是DBGRID控件。但是我用了 SQL.Add('Select * From User_pass');
SQL.Add('Where User_pass.ID="'+lid.Text+'"');
但是在DBGRID里面没动静。按我想的来说,应该过滤出満足lid.Text里的内容呀!
数据指针应该要指到満足Lib.Text的内容上呀!
可是就是没变呀。好像什么也没执行一样(还是指向第一条记录)。
我要怎么做?才能満足lid.Text里的内容显示在DBGRID里呀?
请各位帮助一下OK?
解决方案 »
- 线程中的sleep
- DELPHI7,删除cxGRID控件中的CHECKBOX选中的记录
- 过程定义问题
- sql查询写法
- 我想问一下delphi里面的汉字怎么在别的软件里识别?
- 请各位介绍介绍如何解决窗体缩大缩小时界面变形的问题的!
- 高手,菜鸟都进来,进者有分!!!
- 怎么确定表是空的. adodataset1.bof=adodataset1.eof不行吗?
- 在webBrowser中如何执行javaScript的代码?
- 用query或table查询数据库后,显示在dbgrid中,如何把这些记录打印出来???
- 我用Delphi6.0中的ADO连接远程网络的Sql-Server2000,当机子连上网络后,有的电脑能连通,而有的总是不能连通,这是为什么阿??
- 高手请帮我看看这段代码1有关OLE的
你应该用User_Table1.locate(...)来定位纪录
将DBGRID连上Add_Q
SQL.Add('Where User_pass.ID="'+lid.Text+'"')好这样写好点:
SQL.Add('Where User_pass.ID='+''''+lid.Text+'''');
当然最好用参数!!!
SQL.Add('Where User_pass.ID='''+lid.Text+'''');
试一下,有些dbms双引号会编译为字段
SQL.Add('Where User_pass.ID='''+lid.Text+'''');
begin
Close;
SQL.Clear;
SQL.Add('Select * From User_pass');
SQL.Add('Where User_pass.ID="'+lid.Text+'"');
Execsql;<<<<<<<-------老大这里改成open;
// User_Table1.Refresh;
end;
With User_Table1 do
begin
Open;
Refresh;
end;