[Lazarus] System unit / val-procedure

[Michael Fuchs]

Am 30.05.2012 14:43, schrieb Engelbert Buxbaum:
>  > Bart <bartjunk64 at gmail.com> wrote:
>  > Please provide code example.

Add a "begin" after the "then" in line 58 and the error is gone (don't 
forget to remove "System" from the uses part).

Then you can fix the other bugs in your code.
"ReadChar := value;" in Line 82 is the next one.


And by the way: the way you format your source code is not the best.

hth
Michael