Page
From Lazarus wiki
Jump to navigationJump to search
The standard procedure
page
advances the output of a given textfile by one page.
Page could refer to a piece of paper if the destination is a physical printer, or could imply blanking the entire screen, the specific behavior is implementation-defined.
signature
Page
takes one text
file as a parameter.
It determines the destination.
If the destination is output
, it can be omitted.
page;
is short for page(output);
.
behavior
Provided the destination is open for writing:
- If not at the beginning of a line, do a
writeLn(destination)
. - Implementation-defined method of advancing to the next “page”.
implementation
- On IBM mainframes, advancing to the next page was achieved by putting a
1
, that is the character of the digit 1, in the first column of a line. - On most machines using ASCII though, it simply means emitting a form feed character, i. e.
chr(12)
. The FPC and the GNU Pascal Compiler use this method.
notes
- In the FPC
page
is only available in{$mode ISO}
and{$mode extendedPascal}
. Page
is a regular identifier and as such can be redefined.