Language:
Русский
English
{ScrollTo.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the ScrollTo procedure.}
uses WinCrt;
begin
GotoXY(1,10);
Writeln('Hello');
Writeln('Type in a line and press Enter.');
Readln;
ScrollTo(0,10);
end.
ScrollTo.PAS |
Language: {ScrollTo.PAS} uses WinCrt; begin |
|
|