readln(fin,line);
              fzcode:=trim(copy(line,1,17));
              if copy(filename,1,2)='fl' then              
  begin
              ADOIstRecMsg.SQL.Clear;
               if strlen(pchar(trim(fzcode)))=17 then// 已经读取了一个文件的第一行,为17个字符的数据//往表test123里面写入数据的时候,程序报错      ADOIstRecMsg.SQL.Add(INSERT INTO test123('name', 'datetime') VALUES('fzcode', 'now()'));   
这句编译通不过,不知道啥原因啊。。//表的结果如下:
mysql> desc test123;
+----------+-------------+------+-----+---------+----------------+
| Field    | Type        | Null | Key | Default | Extra          |
+----------+-------------+------+-----+---------+----------------+
| id       | int(11)     | NO   | PRI | NULL    | auto_increment |
| name     | varchar(17) | YES  |     | NULL    |                |
| datetime | datetime    | YES  |     | NULL    |                |
+----------+-------------+------+-----+---------+----------------+
3 rows in setmysql>