sql.add('where Lno='+'"dbgrid1.fields[0].value"');这句话有问题,好好看看吧
解决方案 »
- Delphi Dll窗体 退出时报错?
- 如何让表单最小化时放至任务栏?
- 谁有“公式解析器”的代码,或者有适合Delphi 7的控件,急呀。高分回报。。。 。。。
- 请给出一个树型控件treeview与数据库的结合使用的例子?
- 问个问题,为了使程序开始时就隐藏我用了Application.ShowMainForm := false;可让它显示时窗体上什么都没有
- 快捷键
- 这个问题很简单,但是大家不要藐视他哦
- 为什么我的程序在没有安装delphi的机器上运行不了?
- 急急急急急急急急急急急急急急!!!解决一定给分
- 请教三层结构中,流传递的问题。谢谢
- delphi是否对一个单元的变量总数作限制
- 怎样在控件里添加Font属性??
begin
close;
sql.clear;
sql.add('delete from lesson');
sql.add('where Lno='''+dbgrid1.fields[0].value+'''');
execsql;
end;我觉得dbgrid1.fields[0].value应该换成:dbgrid1.fields.dataset.fields[0].asstring;
sql.add('where Lno="'+VarToStr(dbgrid1.fields[0].value) + '"');