急,以前都没有出现这样的问题啊,还有我在像数据库中写入记录时,出现list index out of bounds,这怎么会越界呢?
adoquery1.Close;
   adoquery1.SQL.Clear;
   adoquery1.SQL.Add('insert into yg (bh,xm,xb,xl,csny,lxdh,bmmc,bmh,lysj,zw,sfzh,dz,resume,picture) values(:bh,:xm,:xb,:xl,:csny,:lxdh,:bmmc,:bmh:lysj,:zw,:sfz,:dizhi,:resume,:pic)');
   adoquery1.parameters[0].Value:=bhedit.Text;
   adoquery1.Parameters[1].Value:=xmedit.Text;
   adoquery1.parameters[2].Value:=xbcombobox.Text;
   adoquery1.Parameters[3].Value:=xlcombobox.Text;
   adoquery1.Parameters[4].Value:=datetostr(datetimepicker1.Date);
   adoquery1.Parameters[5].Value:=lxdhedit.Text;
   adoquery1.Parameters[6].Value:=edit1.Text;
   adoquery1.Parameters[7].Value:=bmbmedit.Text;
   adoquery1.Parameters[8].Value:=datetostr(datetimepicker2.Date);
   adoquery1.Parameters[9].Value:=zwcombobox.Text;
   adoquery1.Parameters[10].Value:=sfzedit.Text;
   adoquery1.Parameters[11].Value:=dizhiedit.Text;
   adoquery1.Parameters[12].Value:=memo1.Text;
   adoquery1.Parameters[13].Value:='.\img\'+bhedit.Text+'.jpg';
   adoquery1.Prepared:=true;
   adoquery1.ExecSQL;