could not convert variant of type(string) into type (date)

Question

DBGrid中的记录放到checklistbox中  可是总是报错：could not convert variant of type(string) into type (date)
dbgrid中的记录有个字段是日期的：2007-12-12 
procedure TForm1.Button1Click(Sender: TObject);
begin
 while not OraQuery1.Eof do
  begin
   checklistbox1.Items.add('<'+oraquery1.Fields[0].Value+'><'+oraquery1.Fields[1].Value+'><'+oraquery1.Fields[2].Value+'><'+oraquery1.Fields[3].Value+'><'+datetostr(oraquery1.Fields[4].Value+'>'));
    oraquery1.Next;
  end;
end;
其中oraquery1.Fields[4]是日期型  我试了：+strtodate(datetostr(oraquery1.Fields[4].Value+'>')
                                       datetostr(datetostr(oraquery1.Fields[4].Value+'>')
都不行  
 高手指点啊！！！我还在加班中  在线等！！

Answer 1

你括号打错了地方，最后这个<'+datetostr(oraquery1.Fields[4].Value+'> '));应该是<'+datetostr(oraquery1.Fields[4].Value）+'> '); 这样就可以了 你试试看

Answer 2

1楼说了。另外这种拼东西的活，建议用Format，包你不会写错括号位置。又或者写个函数，以后多扩展几个字段时照样OK。

Answer 3

括号是打错啦~~~呵呵    不过不是关键问题  我用Format解决了。谢谢各位热心的回答！