archive-com.com » COM » E » EFG2.COM

Total: 878

Choose link from "Titles, links and description words view":

Or switch to "Titles and links view".

  • who may wish to also use it Jamie function UnixTimeToDateTime UnixTime Double UTC Boolean TDateTime var SysTime TmpSysTime TSystemTime DTime TDateTime FTime LTime TFileTime begin DTime UnixTime 24 3600 EncodeDate 1970 1 1 if UTC true then result DTime else begin DateTimeToSystemTime DTime TmpSysTime SystemTimeToTzSpecificLocalTime TimeZoneInformation TmpSysTime SysTime The above commented line only works on WinNT philippe Ranger suggested the following fix SystemTimeToFileTime TmpSysTime FTime FileTimeToLocalFileTime FTime LTime FileTimeToSystemTime LTime

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/1215a.txt (2016-02-14)
    Open archived version from archive



  • By Microsoft MimeOLE V5 00 2615 200 Organization Another Netscape Collabra Server User X MSMail Priority Normal Reply To Ed Dressel Newsgroups borland public delphi objectpascal OneHourFromNow Now 1 24 OneMinuteFromNow Now 1 24 60 OneSecondFromNow Now 1 24 60

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/1207c.txt (2016-02-14)
    Open archived version from archive


  • en Content Type text plain charset us ascii X Trace 15 Feb 2000 12 53 16 0800 129 105 9 211 MIME Version 1 0 Newsgroups borland public delphi objectpascal Mark Lauter wrote Does the Now function suffer the same lack of accuracy 10ms as GetTickCount Is there a better way to get an absolute time in milliseconds QueryPerformanceCounter also try this on Pentium or greater function GetCycleCount int64 asm

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2000/0216.txt (2016-02-14)
    Open archived version from archive


  • time and modification time Gook luck Ian Huang procedure TForm1 Button1Click Sender TObject var Security TSecurityAttributes FileName PChar WriteTime LocalTime TFileTime AccessTime CreateTime TFileTime DosDate DosTime Word SysTime TSystemTime hFile Thandle begin Security nLength SizeOf TSecurityAttributes Security lpSecurityDescriptor nil Security bInheritHandle false hFile CreateFile PChar FILENAME GENERIC READ or GENERIC WRITE FILE SHARE READ OR FILE SHARE WRITE Security OPEN ALWAYS FILE ATTRIBUTE NORMAL 0 if hFile INVALID HANDLE VALUE

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/1117.txt (2016-02-14)
    Open archived version from archive


  • minutes for local time translation on this computer The bias is the difference in minutes between Coordinated Universal Time UTC and local time All translations between UTC and local time are based on the following formula UTC local time bias This member is required StandardName Specifies a null terminated string associated with standard time on this operating system For example this parameter could contain EST to indicate Eastern Standard Time This string is not used by the operating system so anything stored there by using the SetTimeZoneInformation function is returned unchanged by the GetTimeZoneInformation function This string can be empty StandardDate Specifies a SYSTEMTIME structure that contains a date and UTC when the transition from daylight time to standard time occurs on this operating system If this date is not specified the wMonth member in the SYSTEMTIME structure must be zero If this date is specified the DaylightDate value in the TIME ZONE INFORMATION structure must also be specified Local time translations done during the standard time range are relative to the supplied StandardBias value This member supports two date formats Absolute format specifies an exact date and time when standard time begins In this form the wYear wMonth wDay wHour wMinute wSecond and wMilliseconds members of the SYSTEMTIME structure are used to specify an exact date Day in month format is specified by setting the wYear member to zero setting the wDayOfWeek member to an appropriate weekday and using a wDay value in the range 1 through 5 to select the correct day in the month Using this notation the first Sunday in April can be specified as can the last Thursday in October 5 is equal to the last StandardBias Specifies a bias value to be used during local time translations that occur during standard time This member

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/1999/1006b.txt (2016-02-14)
    Open archived version from archive


  • function ISODateStrToDateTime const Date AnsiString TDateTime var D M Y Word begin Result 0 if not IsNumeric Date then Exit if not CheckDateFormat Date then Exit If Time then that means that we have been passed a blank dowm message from an HL7 message Which CheckDateFormat considers valid if Date then Exit Y StrToInt Copy Date 1 4 M StrToInt Copy Date 5 2 D StrToInt Copy Date 7 2 Result EncodeDate Y M D end function ISODateTimeStrToDateTime const DateTime AnsiString TDateTime begin Result ISODateStrToDateTime Copy DateTime 1 8 ISODateTimeStrToDateTime Copy DateTime 9 Length DateTime end function ISOTimeStrToTime const Time AnsiString TDateTime var H M S Ms Word begin Result 0 if not IsNumeric Time then Exit if not CheckTimeFormat Time then Exit If Time then that means that we have been passed a blank down message from an HL7 message Which CheckTimeFormat considers valid if Time then Exit H StrToInt Copy Time 1 2 M StrToInt Copy Time 3 2 if Length Time 6 then S 0 else S StrToInt Copy Time 5 2 if Length Time 6 then Ms 0 else Ms StrToInt Copy Time 7 Length Time Result EncodeTime H M S Ms end Note you must

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2002/0223.txt (2016-02-14)
    Open archived version from archive


  • 548 MIME Version 1 0 Content Type text plain charset us ascii Content Transfer Encoding 7bit NNTP Posting Host 209 173 210 140 X Trace newsgroups borland com 1056231295 209 173 210 140 21 Jun 2003 14 34 55 0700 Lines 10 Path newsgroups borland com not for mail Xref newsgroups borland com borland public delphi database desktop 148403 Can anyone tell me if there is a way that I

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2003/0621.txt (2016-02-14)
    Open archived version from archive


  • Priority 3 X MimeOLE Produced By Microsoft MimeOLE V5 00 2919 6700 Organization Another Netscape Collabra Server User X MSMail Priority Normal Newsgroups borland public delphi winapi Pieter Bakker wrote Hi How can I programmatically force a TDateTimePicker to drop down procedure TForm1 Button1Click Sender TObject var x y integer begin x DateTimePicker1 Width 10 y DateTimePicker1 Height 6 SendMessage DateTimePicker1 Handle WM LBUTTONDOWN 0 MakeLong x y SendMessage DateTimePicker1

    Original URL path: http://www.efg2.com/Lab/Library/UseNet/2000/0714.txt (2016-02-14)
    Open archived version from archive



  •