代码如下
function Gettimestamp(dateTimeStr:String): string;
var
unix_time:int64;
begin
unix_time:=Datetimetounix( IncHour( strToDateTime(dateTimeStr),-8) ); //减8小时
Result := inttostr(unix_time);
end;
代码如下
function Gettimestamp(dateTimeStr:String): string;
var
unix_time:int64;
begin
unix_time:=Datetimetounix( IncHour( strToDateTime(dateTimeStr),-8) ); //减8小时
Result := inttostr(unix_time);
end;