12 lines
187 B
ObjectPascal
12 lines
187 B
ObjectPascal
|
type
|
||
|
|
timeStamp = packed record
|
||
|
|
dateValid: Boolean;
|
||
|
|
year: integer;
|
||
|
|
month: 1..12;
|
||
|
|
day: 1..31;
|
||
|
|
timeValid: Boolean;
|
||
|
|
hour: 0..23;
|
||
|
|
minute: 0..59;
|
||
|
|
second: 0..59;
|
||
|
|
end;
|