基于delphi和SQL的一个问题

Question

ADOQuery1.close;
     ADOQuery1.sql.Clear;
     ADOQuery1.Parameters.Clear;
     ADOQuery1.sql.Add('insert into book valuaes(edit1.seltext,edit2.seltext,edit3.seltext,edit5.seltext,edit4.seltext,edit7.seltext,edit0.seltext),''0''');
     ADOQuery1.open;能这样用么?

Answer 1

  ADOQuery1.close;
  ADOQuery1.sql.Clear;
  ADOQuery1.sql.Text:= 'insert into book Valuaes('''+
                       edit1.text+''','''+edit2.text+''','''+edit3.text+''','''+
                       edit5.text+''','''+edit4.text+''','''+edit7.text+''','''+
                       edit0.text+''',''0''';
  ADOQuery1.ExecSQL;

Answer 2

ADOQuery1.close;
  ADOQuery1.sql.Clear;
  ADOQuery1.Parameters.Clear;
  ADOQuery1.sql.Add('insert into book valuaes('+quotedstr(edit1.text)+','+quotedstr(edit2.text)+','+quotedstr(edit3.text)+','+quotedstr(edit4.text)+','+'''0'')');
  ADOQuery1.open;

Answer 3

   with ADOQuery1  do
   begin
     close;
     sql.Clear;
     sql.Add('insert into book valuaes('+quotedstr(edit1.text)+','+quotedstr       (edit2.text)+','+quotedstr(edit3.text)+','+quotedstr(edit4.text)+','+'''0'')');
      open;
    end;写代码要美观一点，以方便其它人看，最后把ADOQuery1的名字改下

Answer 4

with ADOQuery1 do
  begin
  close;
  sql.Clear;
  sql.Add('insert into book valuaes('+quotedstr(edit1.text)+','+quotedstr (edit2.text)+','+quotedstr(edit3.text)+','+quotedstr(edit4.text)+','+'''0'')');
  ExecSQL;
  end;写代码要美观一点，以方便其它人看，最后把ADOQuery1的名字改下

Answer 5

insert into book valuaes其中的Values，多了一个字母

Answer 6

ADOQuery1.close;
  ADOQuery1.sql.Clear;
  ADOQuery1.sql.Text:= 'insert into book Values('''+
                       edit1.text+''','''+edit2.text+''','''+edit3.text+''','''+
                       edit5.text+''','''+edit4.text+''','''+edit7.text+''','''+
                       edit0.text+''',''0''';
  ADOQuery1.ExecSQL;