Pascal run time error

The thread below might help. Good luck.