adotquery中如何实现添加？

Question

adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('insert into lsgxx'+'(bid,name,sex,address,phone,job,area,photo)'
+ 'value'+'(:bid1,:name1,:sex1,:address1,:phone1,:job1,:area1,:photo1)')
（不执行处！）！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！
adoquery1.Parameters[0].Value:=strtoint(edit2.text);
adoquery1.Parameters[1].Value:=edit3.Text;
adoquery1.Parameters[2].Value:=combobox2.Text;
adoquery1.Parameters[3].Value:=edit4.Text;
adoquery1.Parameters[4].Value:=edit5.Text;
adoquery1.Parameters[5].Value:=combobox4.Text;
adoquery1.Parameters[6].Value:=combobox3.Text;
adoquery1.Parameters[7].Value:=nill;
adoquery1.execsql;

Answer 1

var bid1:integer;
name1,sex1,address1,phone1,job1,area1,photo1:string;
begin
bid1:=strtoint(edit2.text);
name1:=edit3.Text;
sex1:=combobox2.Text;
address1:=edit4.Text;
phone1:=edit5.Text;
job1:=combobox4.Text;
area1:=combobox3.Text;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('insert into lsgxx '+'(bid,name,sex,address,phone,job,area,photo)');
adoquery1.sql.add('value'+'('+bid1+','''+name+''''+','''+sex1+''''+','''+address1+''''+','''+phone1+''''+','''+job1+''''+','''+area1+''''+','+')');
缺少空格,缺少分号adoquery1.execsql;