TVDEMO, a Turbo Vision example from Borland Pascal
In order for the original source code from Borland to work with
Virtual Pascal for OS/2, the following changes need to me made. Note,
that the source will still work with Borland Pascal after the changes
have been made.
* Add Use32 to all the Uses clause of all units
* Change TVDEMO.PAS:
- Change line 230 from
MaxHeapSize := HeapSize;
to
{$IFNDEF VirtualPascal} MaxHeapSize := HeapSize; {$ENDIF}
* Change CALENDAR.PAS and PUZZLE.PAS:
Since the Word type is 32 bit in Virtual Pascal, the declaration on
line 142 (CALENDAR.PAR) or line 117 (PUZZLE.PAS):
B: array[0..Width] of Word;
should be changed to
B: TDrawBuffer;
The tDrawBuffer explicitly uses a 16-bit Word type and is compatible
with both Virtual Pascal and Borland Pascal.
* Change TVDEMO.PAS:
- After the Uses clause, add the following:
{$IFDEF VPDEMO}
{$Dynamic VP11Demo.Lib}
{$ENDIF}
This means, that the program will use all units stored in the
Demo Licence DLL (vp11demo.dll) when the program is compiled with
the demonstration version of VP/2.