Pascal/Turbo Pascal - tiempo en una variable

nesecito un fabor bien grande... necesito desplegar una pantalla de una opcion de un juego, el jugador decide cuanto tienpo desea que la pantalla este activa, y devera permanecer asi hasta que el usuario lo indique.... necesito que me digan un procedimiento o una funcion para hacer eso..ADEMAS deve ir imprimiendo cuanto tiempo le queda disponible para responder...
Bueno espero me entiendan lo que quiero... y me respondan lo mas rapido posible.. si no es mucha molestia claro... bueno espero me contesten pronto... gracias!!!

O sea, un contador de tiempo restante...
Hay varias formas de hacerlo, lo que necesitarás es el procedimiento gettime() de la unidad Dos. Voy a intentar hacer un ejemplo y lo envio a tu mail (si este es válido).