strhao:=dm1.adoQuery.fieldbyname('hao').AsString;
dm1.adoInfoquery.Active:=false;
dm1.adoInfoquery.SQL.Clear();
dm1.adoInfoquery.SQL.Add('select * from '+strCurrTable+' where hao='+strhao);
dm1.adoInfoquery.Open();
dm1.adoInfoquery.Active:=false;
dm1.adoInfoquery.SQL.Clear();
dm1.adoInfoquery.SQL.Add('select * from '+strCurrTable+' where hao='+strhao);
dm1.adoInfoquery.Open();
解决方案 »
- 麻烦大家帮我看看,有关Emgu OpenCV的设置和安装的问题
- delphi中 如何通过变量值获得变量的名称?
- 如何对style=csDropDownlist的combobox的text赋值?
- 请帮我看看通讯 较验程序 有何问题
- 怎样设置一个Form在擎ESC时关闭,急!
- 怎么让选中的记录变色及闪动?(在线等待)
- 请高手帮个dbgrid的小忙
- 有人知道哪里有制作系统托盘的控件(换肤的控件呢)?(附带教我用,两样)
- 文件读写问题,非常急~````
- 百分以求Dephi开发的网站、以及程序编写的注意事项、重大的要避免的Bug~!!!
- Error creating cursor handle是什么意思啊?
- 哪里有delphi6的注册码,不要“注册码 z9j8-pum4n-c6gzq认证码 rw2-7jw ”这一组
dm1.adoInfoquery.Active:=false;
dm1.adoInfoquery.SQL.Clear();
dm1.adoInfoquery.SQL.Add('select * from '+strCurrTable+' where hao='''+strhao+'''');
dm1.adoInfoquery.Open();