就是我在用DBEdit、StaticText、ComboBox组件制作数据单(表单)时
我要删除显示出来的一条记录,
代码如下:
With ADOQuery1 do
begin
SQL.Clear;
SQL.ADD('DELETE From Book Where Code=:ComboBox1.text');
execsql;
end;
这样不能执行其删除操作,这是为什么!
我要删除显示出来的一条记录,
代码如下:
With ADOQuery1 do
begin
SQL.Clear;
SQL.ADD('DELETE From Book Where Code=:ComboBox1.text');
execsql;
end;
这样不能执行其删除操作,这是为什么!
sth : string;
begin
sth :='DELETE From Book Where Code=:ComboBox1.text'
With ADOQuery1 do
begin
SQL.Clear;
SQL.ADD(sth );
execsql;
end;
这样就可以啦
你应该这样做
With ADOQuery1 do
begin
close;
SQL.Clear;
SQL.ADD('DELETE From Book Where Code='+ComboBox1.text);
execsql;
end;
With ADOQuery1 do
begin
close;
SQL.Clear;
SQL.ADD('DELETE From Book Where Code= :code');
parmaeters.parambyname('code').value := combobox1.text;
execsql;
end;
在DELPHI中,经常会牵涉到这种动态SQL语句的写法。
用
With ADOQuery1 do
begin
SQL.Clear;
SQL.ADD('DELETE From Book Where Code='+quotedstr(ComboBox1.text));
execsql;
end;
就可以了