s2的内容是这样的:20021022
adotable1.FieldByName('tzrq').Value:=copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2);
adotable1.FieldByName('tzrq').asstring:=strtodate(copy(s2,1,4)+'-'+copy(s2,5,2)+'-'+copy(s2,7,2));
上面的两种方法都不行;
各位帮帮忙;