PageEnd

Синтаксис

Sub PageEnd()

Описание

Используется для окончания печати текущей страницы. Функция находится в пространстве имен window9

Параметры

нет

Платформы

Windows

Пример

#Include "window9.bi"
Using window9
Dim Po As SinglePoint
StartPrinter(@po)
FontDraw(LoadFont("Arial",22*po.x))
For a As Integer=1 To 3
  PageStart()
  TextDraw(10*po.x,10*po.y,"Страница № "&a,-1)
  PageEnd()
Next
StopPrinter()

Created with the Personal Edition of HelpNDoc: Produce electonic books easily