DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word);
它只是把时间全部从TIME里分出来分别放入Hour, Min, Sec, MSec中,你只要Hour、Min
的话,你只取Hour、Min就是了,可以不管Sec、MSec
showmessage('the current time is'+inttostr(hour)+':'+inttostr(min));
OK!
它只是把时间全部从TIME里分出来分别放入Hour, Min, Sec, MSec中,你只要Hour、Min
的话,你只取Hour、Min就是了,可以不管Sec、MSec
showmessage('the current time is'+inttostr(hour)+':'+inttostr(min));
OK!
解决方案 »
- 请高人把这几句vb6代码转成delphi7的
- 我用的是delphi7 有人建议下载个CNPACK,请问谁有,要合适delphi7的
- Delphi 电驴下载地址!
- RES使用的疑问
- 两个dbgrid联用。
- 请教高手,delphi mdi应用里 ShowModal(模式窗体)能否在任务栏上不显示单独图标?
- recNo的值为什么始终为-1?
- 转换???
- 程序员的心路历程 李维读“>”有感。
- 我想放弃VB改学DELPHI,合适吗?
- 调用API函数,如何把DELPHI 的字符串转化 Pchar 类型
- 请问报表大侠:quickreport中的复合报表控件预览窗口能不能不让它有最小化最大化按钮,或者让它stayontop也行
ShowMessage(FormatDateTime('hh',now));
ShowMessage(FormatDateTime('nn',now)