时间格式转换问题

11111

请问有没有可以将时间格式（time形式）的数据转化成整形的多少秒或小时的函数。
# ]2 N; G3 ^. V0 |2 J- S( _比如time类型显示为1:00:00:00.0000，怎么转化为小时（24）或秒（86400）

五五

直接赋值到一个real变量里面就变成秒了 只针对time变量 日期时间 不行

dongshui8558

is
        tm:time;
4 i3 \3 ^: A& o( o- c6 Ldo
1 r* P4 F8 R# g& g$ `; n        tm := str_to_time("1:00:00:00");
        print time_to_num(tm);        --Convert to number.
9 x  F. `2 \/ U) G. q7 @end;