各位DFW,关于时间过虑问题,小弟有求....急.急.急(20分)

R

renchaoxin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-25

• #1

我想获得,本年度的所有记录,代码如下:
1.with adotable1 do
begin
filter:=formatdatetime('yyyy',fieldbyname('结束时间').asdatetime)+'='+format('yyyy',now);
filtered:=true;
end;
2.with adotable1 do
begin
filter:='结束时间 ='+formatdatetime('yyyy',now);
filtered:=true;
end;
两种方法,均不得其解,希望,那位大侠帮帮忙,小弟感激不禁

 

D

delphi_beginer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-25

• #2

with adotable1 do
begin
filter:='结束时间 <='+formatdatetime('yyyy',now);
filtered:=true;
end;
或者干脆使用adoquery,用SQL语句查询岂不更好?

 

L

lynu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-25

• #3

时间的分隔符呢?试试
filter:='结束时间 >='''+formatdatetime('yyyy',now)+'-1-1'' and 结束时间 <'''+
FormatFloat('0000',YearOf(Now)+1)+'-1-1''';

 

H

hfghfghfg

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-18

• #4

procedure TForm1.Query1FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept:=条件成立

end;

 

P

plane822

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-18

• #5

.with adotable1 do
begin
filter:='year(结束时间)='+format('yyyy',now);
filtered:=true;
end

 

R

renchaoxin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-22

• #6

接受答案了.