Anything · Lazarus or Delphi

turbopascal-textgraf

Textmode and Graphics Mode Lib for Turbo Pascal on DOS (Predecessor of the X-LIB Unit)

Member rating

No ratings yet.

Textmode and Graphics Mode Lib for Turbo Pascal on DOS

Compile.bat uses Turbo Pascal 6.0 installed in c:\progrs\tp\

pascal

compile.bat

In your pascal code with add following usage

pascal

use textgraf

pascal

case InitTextGraf of
     1: begin end;
end;
GrafikMode($13);

Method	Description
`InitTextGraf: integer`	Must be called at the very beginning of the program while still in text mode. Without this, the rest won't work. Returns 0 if everything is OK, -1 for unknown video type, and 1 for insufficient memory (requires about 12KB).
`SetPaletteSave(On: boolean)`	Call with `On = true` after `InitTextGraf` and in text mode. Saves the text palette and reserves memory for the graphics palette, which will then be used automatically. `On = false` disables this automation and frees the memory for the palettes (about 1.5KB).
`ToText`	Switches from graphics to text mode. Saves the screen content, etc.
`ToGraph`	Switches back to graphics mode. A graphics mode should have been exited with `ToText` beforehand to initialize all values.
`GrafikMode(Mode: byte)`	Sets the video mode.
`GetMonTyp: MonitorTyp`	Returns the monitor type.
`SetVGAColors(var Colors: VGAColors)`	Sets the VGA colors.