TYPE
  TimeRec = RECORD
              TimeComp   : Integer;
              TimeString : String80;
              Hours,Minutes,Seconds,Hundredths : Integer
            END;
