语法对吗？

Question

self.ADOQuery1.SQL.Clear;
self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');
self.ADOQuery1.SQL.Add('values（'+Edit1.Text+','+edit2.Text+','+edit3.Text+','+edit4.Text);
self.ADOQuery1.SQL.Add(','+edit5.Text+','+edit6.Text+','+edit7.Text+')');
self.ADOQuery1.ExecSQL;我写了这样的代码，运行出错，是哪里错了？

Answer 1

self.ADOQuery1.SQL.Clear;
self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');
self.ADOQuery1.SQL.Add('values（''+Edit1.Text+'',''+edit2.Text+'',''+edit3.Text+'',''+edit4.Text);
self.ADOQuery1.SQL.Add('',''+edit5.Text+'',''+edit6.Text+'',''+edit7.Text+'')''');
self.ADOQuery1.ExecSQL;

Answer 2

self.ADOQuery1.SQL.Clear;
self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');
self.ADOQuery1.SQL.Add('values（'+quotedstr(Edit1.Text)+','+edit2.Text+','+quotedstr(edit3.Text)+','+quotedstr(edit4.Text));
self.ADOQuery1.SQL.Add(','+quotedstr(edit5.Text)+','+quotedstr(edit6.Text)+','+quotedstr(edit7.Text)+')');
self.ADOQuery1.ExecSQL;

Answer 3

Delphi提示的是什么啊？发现错误后它会给你一个可能出错的地方

Answer 4

#1 self.ADOQuery1.SQL.Clear;#2 self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');#3 self.ADOQuery1.SQL.Add('values（''+Edit1.Text+'',''+edit2.Text+'',''+edit3.Text+'',''+edit4.Text);#4 self.ADOQuery1.SQL.Add('',''+edit5.Text+'',''+edit6.Text+'',''+edit7.Text+'')''');#5 self.ADOQuery1.ExecSQL;请看到#3这行的values后面的左括号是全角的“（”，改成半角"("

Answer 5

还没有打开ADOQUERY可以编辑状态吧 ！

Answer 6

self.ADOQuery1.SQL.close;//先把adoquery 关掉
self.ADOQuery1.SQL.Clear;self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');
self.ADOQuery1.SQL.Add('values（'+quotedstr(Edit1.Text)+','+edit2.Text+','+quotedstr(edit3.Text)+','+quotedstr(edit4.Text));self.ADOQuery1.SQL.Add(','+quotedstr(edit5.Text)+','+quotedstr(edit6.Text)+','+quotedstr(edit7.Text)+')');
self.ADOQuery1.ExecSQL;

Answer 7

self.ADOQuery1.SQL.close;//增加了这一句
//  '要改成'''',才在SQL语句中表示一个引号啊!
self.ADOQuery1.SQL.Clear;
self.ADOQuery1.SQL.Add('insert into t (序号,名称,图号,单位,生产商,使用订单,备注,图片位置)');
self.ADOQuery1.SQL.Add('values（''''+Edit1.Text+'''',''''+edit2.Text+'''',''''+edit3.Text+'''',''''+edit4.Text);
self.ADOQuery1.SQL.Add('''',''''+edit5.Text+'''',''''+edit6.Text+'''',''''+edit7.Text+'''')');
self.ADOQuery1.ExecSQL;

Answer 8

SQL语法有错误，query语法正确，用把这句话赋给一个Edit或memo控件然后拷出来直接执行判断错在什么地方