delphi中如何设置Ttable控件的filter条件

[luxy]

我在编程中需要对Ttable的filter的条件根据用户的选择来设置，如根据用户输入的日期来设置filter的值，即filter的表达式中含有变量。
例如：

var
d:tdatetime;
begin
d:=strToDateTime(edit1.text)
tblContract.filter:='sdate>=d;'
end;
其中sdate为tblContract的一个field, d为变量.但上述程序出错，请问问题在那里？
我试图在d前面加:,即变量为:d,还是不行。

[feng_bd]

这位老弟啊，
（1）'sdate>=d;'
d是一个变量，怎么能写到字符串常量中去用呢？
（2）d:=strToDateTime(edit1.text)
Filder属性是字符串类型，你干吗要把好好的字符串edit1.text变成个DateTime呢？直接拿来用就好了！

[continue]

var
d:tdatetime;
begin
d:=edit1.text;
//一定要先将 d 格式化为你的DBMS的"时间或日期字符串"
tblContract.filter:='sdate>='+ d ;
end;

[luxy]

谢谢回复！
我按feng_bd的建议试了
tblContract.filter:='sdate>=edit1.text';
运行时出错：
“Project Project1.exe raised exception class EDatabaseError with message 'TblContract:field 'edit1.text' not found”

请教continu如何将 d 格式化为你的DBMS的"时间或日期字符串"，照您的程序编译出错：
[Error] Unit1.pas(73): 不相容类型: 'String'并且 'TDateTime'

[luxy]

问题解决了，谢谢continu兄。

[luxy]

我将程序改为：
var
d:tdatetime;
begin
d:=edit1.text;
tblContract.filter:='sdate>='+ dateToStr(d) ;
end;
问题解决了，谢谢continu兄。