مشکل کار با صفحه کلید

[ali_r_h]

سلام من دارم یک برنامه با TC می نویسم و به تابعی احتیاج دارم که بفهمه کلیدی در بافر صفحه کلید وجود داره یا نه(keypress)یه چیزی شبیه کد زیر که با سینتکس پاسکاله:
if keypress then
ch:=readkey;

[ali_r_h]

خودم پیدا کردم:
kbhit();