[Novatin]

Que tal amigos, como parte de mi aprendizaje de Pascal estoy convirtiendo mucho código de Turbo C++ a Pascal...

Y me surgio un pequeño gran problema... Tengo el siguiente código en C++ que me permite capturar la pulsación de teclas independientes y teclas combinadas (dos teclas presionadas al mismo tiempo):

while(True)
{
   for(i=0;i<20;i++)
     if(kbhit())
        getch();

   select=getch();

   if(select==0)
       select=getch()+1000;

   printf("%d",select);

   //aca va mas codigo... 
}

E intentado traducir esto a Pascal... sin embargo veo que Pascal no tiene la funcion kbhit(), busque la ayuda y solo tiene la funcion ReadKey() que es equivalente a getch();

Como podría implementar esto en Pascal...??

Gracias de antemano por sus consejos..