关于money类型的查询

Question

现有一个表有一字段td为money类型写语句
select * from table_tdlqcpk where sysl<>0  and td<'1' 
显示
不允许从数据类型 varchar 到数据类型 money 的隐性转换（表 'Xtdsjk.dbo.Table_tdlqcpk'，列 'TD'）。请使用 CONVERT 函数来运行此查询。
请问在delphi中如何写这个语句

Answer 1

select * from table_tdlqcpk where sysl<>0  and td<1

Answer 2

select * from table_tdlqcpk where sysl<>0  and td<cast('1' as money)

Answer 3

单引号去掉就可以
select * from table_tdlqcpk where sysl<>0  and td<1