可能以下两句应该不换行
  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;

解决方案 »

  1.   

    with ADOQuery1 do
    begin
      Close;
      SQL.Clear
      SQL.Add('Insert Into TableName');
      SQL.Add('(Field1,Field2)'); 
      SQL.Add(' values ('''+Var1+''','''+Var2+''')')
      ExecSQL;
    end;
      

  2.   

    with ADOQuery1 do
    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;
      

  3.   

    with ADOQuery1 do
    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;