如何获得系统时间的月份？(21分)

Y

youjq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-06

• #1

 

D

DreamTiger

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-06

• #2

decodedatetime

 

车

车金明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-06

• #3

function GetMonth:WORD;
var
y,m,d:WORD;
begin
decodedate(Date,y,m,d);
result:=m;
end;

 

Y

youjq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-09

• #4

多人接受答案了。