1 2 3 4 5 6 7 8 9 10 11 12
Program Example; { Program to demonstrate the *** function. } Uses video,keyboard,vidutil; begin InitVideo; InitKeyboard; DoneKeyboard; DoneVideo; end.