可能以下两句应该不换行
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
试试以下语句:
with ADOQuery1 do
begin
Close;
SQL.Clear
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
SQL.Add('values (Field1='''+Var1+''',Field2='''+Var2+''')')
ExecSQL;
end;
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
试试以下语句:
with ADOQuery1 do
begin
Close;
SQL.Clear
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
SQL.Add('values (Field1='''+Var1+''',Field2='''+Var2+''')')
ExecSQL;
end;
解决方案 »
- 请教DELPHI窗体创建调用问题!
- Delphi中指针应该可作参数的吧,可这样为何编译不过?
- Delphi 面向對象編程思想
- 如何在保存excel文件时去掉是否保存的提示?
- 为什么这里的Timage.fillrect不起作用? 画图区域并没有增大?
- 在变量数目要在程序中取得的前提下,怎样在VAR下定义变量?
- 有谁知道odac 4.0以上版本在那里下载?知道的同志 不要错过。
- 如何获得dbcombobox的选择值?
- 很急,SQL问题!!解决了有分!!
- 用过DELPHIX的哥们请看:下面这几行程序为什么运行十几个小时就会使WIN98崩溃(像死机一样)?
- delphi报表的一个问题!
- 关于GRID中,显示列与数据列的问题???
begin
Close;
SQL.Clear
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
SQL.Add(' values ('''+Var1+''','''+Var2+''')')
ExecSQL;
end;
begin
Close;
SQL.Clear
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
SQL.Add('values (:Field1,:Field2)
Parameters.ParamByName('Field1').Value:=Var1;
Parameters.ParamByName('Field2').Value:=Var2;
ExecSQL;
end;
begin
Close;
SQL.Clear
SQL.Add('Insert Into TableName');
SQL.Add('(Field1,Field2)');
SQL.Add('values (:Field1,:Field2)'); // 少COPY了一点
Parameters.ParamByName('Field1').Value:=Var1;
Parameters.ParamByName('Field2').Value:=Var2;
ExecSQL;
end;