如何在报表控件RM3中将DATETIME 字段的值如“2003-1-1 16:00:00”转换成“2003年1月1日下午4时”打印出来呀?
解决方案 »
- delphi 的 button文字运行时鼠标经过文字会变化是怎么回事?
- 再问一段代码!
- 请教大侠:ado+access,数据库里面单精度类型,我设置了小数位数为两位。可是读到dbgrid里面后,小数有一长串!请问如何去掉?
- 有没有办法让扫条形码的edit只能用条码扫描仪扫入,不能用键盘输入?
- 简单,如何给当前时间加上10秒中?
- 高分请教几个简单的DLL的名字(绝对菜),快来呀,先说对的就全得呀,不够分可以再加!!!(在线等待中!!!)
- 急求:谁有INSTALLSHIELD 7的东方语言包的地址
- 为什么我使用元件wordcap时候,出现file not found'DsgnIntf.dcu'??
- 数据类型的问题,请来解答!
- 我从哪儿可以买到〈Delphi用户参考手册〉?
- 求助:能否将这段qb代码转为delphi
- 那里可以下载dephi4.0
var
hourtime : String;
begin
hourtime:=Formatdatetime('h',now());
if StrtoInt(hourtime)>12 then
showmessage(formatdatetime('yyyy年M月d号',now())+'下午'+InttoStr(StrtoInt(hourtime)-12)+'时')
else
showmessage(formatdatetime('yyyy年M月d号',now())+'上午'+hourtime+'时') ;
end;
var
hourtime : String;
begin
hourtime:=Formatdatetime('h',now());
if StrtoInt(hourtime)>12 then
showmessage(formatdatetime('yyyy年M月d号',now())+'下午'+InttoStr(StrtoInt(hourtime)-12)+'时')
else
showmessage(formatdatetime('yyyy年M月d号',now())+'上午'+hourtime+'时') ;
end;