| ESBDecodeTime Procedure |
Unit
QESBPCSDateTime
Declaration
Procedure ESBDecodeTime(const Time: TDateTime; var Hour, Min, Sec, MSec: Word);
Category
Date/Time Conversion RoutinesImplementation
procedure ESBDecodeTime (const Time: TDateTime; var Hour, Min, Sec, MSec: Word);
begin
try
DecodeTime (Time, Hour, Min, Sec, MSec)
except
raise EConvertError.Create (rsInvalidDateTime);
end;
End; |
|
|