From e404b904c14a9e7bd0eb50b2c90155fd69f13198 Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Tue, 10 Jun 2008 16:07:22 +0200 Subject: Cleanup. --- UCoreUtils.pas | 11 ----------- 1 file changed, 11 deletions(-) (limited to 'UCoreUtils.pas') diff --git a/UCoreUtils.pas b/UCoreUtils.pas index 4beec94..6ee28d4 100644 --- a/UCoreUtils.pas +++ b/UCoreUtils.pas @@ -56,7 +56,6 @@ const ConstERRSpawn = 26; function GetErrorString(ErrorNo: integer): string; function GetSignalString(SignalNo: integer): string; -function UnixTimeToTDateTime(UnixTime: Int64): TDateTime; function FormatSize(Value: Int64; Base: integer; OverrideSizeFormat: integer = -1): string; function FormatDate(Value: TTimeT; const FormatTime, FormatDate: boolean; OverrideTimeFormat: integer = -1; OverrideDateFormat: integer = -1; OverrideDateTimeFormat: integer = -1; OverrideCustomDateFormat: string = ''; OverrideCustomTimeFormat: string = ''): string; @@ -174,16 +173,6 @@ begin Result := StrToUTF8(strsignal(SignalNo)); end; -(********************************************************************************************************************************) -function UnixTimeToTDateTime(UnixTime: Int64): TDateTime; -//var tm : PUnixTime; -begin - Result := UnixToDateTime(UnixTime); -{ tm := localtime(@UnixTime); - Result := EncodeDate(tm^.tm_year + 1900, tm^.tm_mon + 1, tm^.tm_mday) + - EncodeTime(tm^.tm_hour, tm^.tm_min, tm^.tm_sec, 0); } -end; - (********************************************************************************************************************************) function FormatFloat64(Value: Int64; Sep: string): string; var i : integer; -- cgit v1.2.3