Query1.ParamByName('times').Clear;ExecSQL执行后出错

[xyz_no1]

代码如下
with query1 do
begin
close;
Sql.Clear;
Sql.Add('insert into Test(number,name)');
Sql.Add('values(:no,:times)');
ParamByName('no').AsString:='1';
ParamByName('times').Clear;
ExecSql;
end;
出错信息为：“Field times is of an unknow type”
谁有办法让ParamByName('times')清空?

[Nizvoo]

你这样改改

ParamByName('times').AsString := '' ;

[lldwolf]

同意楼上

[byrybye]

up

[xyz_no1]

对了，那边有点错误，name为datetime类型
我原来也想用ParamByName('times').AsString := '' ,可出错

[xyz_no1]

up

[xyz_no1]

抱歉，那边写错了，该为：
with query1 do
begin
close;
Sql.Clear;
Sql.Add('insert into Test(number,times)');
Sql.Add('values(:no,:times)');
ParamByName('no').AsString:='1';
ParamByName('times').Clear;
ExecSql;
end;
times域为Datetime类型

[zgamer]

up

[coolbaby]

将times字段设置成可以为空
试试！

[hantao]

up

[xyz_no1]

本来就设为空的

[xyz_no1]

还是同样的错误

[jabmoon]

呵呵，你这是从哪里看来的Delphi语法？

[yoryor]

ParamByName('times').AsString := '' ;

[newyj]

into Test(number,name)');
Sql.Add('values(:no,:times)');
name 和 times根本对不上

[zgamer]

up

[hzb]

试一下
procedure TForm1.Button1Click(Sender: TObject);
begin
with query1 do
begin
close;
Sql.Clear;
Sql.Add('insert into Test(number,times)');
Sql.Add('values(:no,:times)');
ParamByName('no').AsString:='1';
ParamByName('times').DataType := ftDateTime;
ParamByName('times').Value :=null;
ExecSql;
end;

end;