procedure TData.T_kehuFilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
if ((Data.T_kehu.FieldByName('还款日期').Value<=dayof(date)) and (Data.T_kehu.FieldByName('还款日期').Value>=0)) then
Accept:=true
else
Accept:=false;
end;为什么会报错,说dayof不合法,难道 TData.T_kehuFilterRecord()中不能用函数,还是应该如何正确使用,请大家帮忙!!!
begin
if ((Data.T_kehu.FieldByName('还款日期').Value<=dayof(date)) and (Data.T_kehu.FieldByName('还款日期').Value>=0)) then
Accept:=true
else
Accept:=false;
end;为什么会报错,说dayof不合法,难道 TData.T_kehuFilterRecord()中不能用函数,还是应该如何正确使用,请大家帮忙!!!
解决方案 »
- websnap,在运行debuger时,点击那个URL,总显示出错页面,见内。如何解决?
- [求助]dxdbgrid多表头怎么样实现啊?
- 请问如何设置 BDE 连接 Microsoft Visual FoxPro 6.0 的.dbf 文件
- 怎样取出汉字的点阵信息...
- 那我能给出的最高分求教(不够可以再加):ADO编程中Master/Detail和继承的问题
- 我创建了一个TListView类型的listview,可是不能通过程序给他添加项目,要怎样才能实现呀?
- 如何在Dbgrid单元格中显示不同的颜色?
- 关于一个ini的问题?
- setfocus的用法
- 各位程序员师傅,我是delphi新手,我希望按下一个button来实现静音,不知道用下面这段摘抄的代码能够实现么?
- 关于双线程.我怎么样实时地把主线程中的数据传入到另外一个线程的函数参数中.
- 一个数据小数点问题!急死俺了!!
呵呵