一般的参数赋值的方法是不行的,如下方法:
var i:integer;
fldName : string;
d : TDateTime;
begin
...
sSQL := Format('insert into abc.dbf (TyNUMERIC,TyChar,TyDate,Tyvarchar,Tydatetime)'
+' values (%d,%s,%s,%s,%s)',
[11,
QuotedStr('TyChar'),
':TyDate',
QuotedStr('Tyvarchar'),