now();
DecodeDate(a:TDateTime,year:word,month:word,day:word);
DecodeDate(a:TDateTime,year:word,month:word,day:word);
解决方案 »
- 如何在运行时选定dbGrid中的内容后,在修改页面中进行修改?请大家帮帮忙!
- 高手帮我看看这段程序中存储过程为什么不执行阿
- 如何得出网络中的所有计算机?
- 做的程序在其他人的计算机上无法运行,提示的错误是缺少rtl60.bpl
- 怎么捕获的异常代码并处理掉?
- 关于复制dataset!高手请进!
- MainMenu控件怎么不能用在ActiveXForm上?
- 会用 PowerPoint 的高手请进
- 哪位大虾对用友的情况比较了解,如工资、福利、工作时长。。。。
- [Error] RLINK32: Error opening file "C:\testpas.DFM"
- 关于DELPHI pack注册码
- 两个SAVE有何不同?
var
SystemTime: TSystemTime;
begin
GetLocalTime(SystemTime);
Result := SystemTimeToDateTime(SystemTime);
end;