delphi Ado的一个bug

 在delphi中，Tadoquery在传参数时，如果传递的参数为中文，则有可能会被截断。

例如：

 qry.close;

 qry.sql.clear;

 qry.sql.add('insert into t(a)  values(:aa)');

qry.Parameters.ParamByName("aa").value := '中华人民共和国';

qry.executesql;

 

上面这段代码在执行时，在delphi7或者delphi2007，参数有可能被截断（并不是所有，看情况）。

解决的方法有两种，一种就说在参数赋值之前加下面语句

qry.Parameters.ParamByName("aa").size:=30

设置长度

 

第二种，就说改adodb.pas，这个网上有文章说明，大家可以搜索下，因为我怕改了会带来其它问题，所以一般用第一种方法。

 

其实出现截断字符串的情况，实际上是因为delphi算参数长度算错的原因，所以要修改计算参数长度的部分。第一种方法就说在赋值之前，就设置参数长度。