Pascal/Turbo Pascal - obtener hora

Me gustaria saber como podria hacer un procedimiento para para poder obtener la hora y la fecha del sistema informatico.
Se que mas o menos se debe hacer con un procedimiento del tipo Get Time pero no se muy bien como desarrollarlo, si alguien me pudiera ayudar se lo agradeceria.
un saludo.
Gracias

Todo lo que yo sé al respecto es lo que pone en una práctica que tengo espero que te ayude:
Para introducir el tiempo en la información que se guarda de los mensajes, se utilizará la librería Dos de Turbo Pascal. Para ello después de escribir la cabecera del programa aparecerá la siguiente línea de código:
USES Dos;
De este modo el compilador nos permitirá utilizar los procedimientos GetDate y GetTime, que nos permitirán conocer la fecha y la hora del sistema. Los parámetros que devuelven estos procedimientos son de tipo word, enteros positivos, siendo sus cabeceras:
GetDate (VAR anio, mes, dia, dia_semana: word);
GetTime (VAR hora, minuto, segundo, cent_segundo: word);