Sub FramePage(ByRef Left As Integer, ByRef Right As Integer, ByRef Top As Integer, ByRef Bottom As Integer)
Запускает диалог параметры страницы. Используется для установки и\или получения отступов печати текста. Для установки отступов, нужно указать в параметрах буферы типа Integer с числовыми значениями. После выполнения функции в буферы возвращаются реальные значения отступов. Функция находится в пространстве имен window9.
Left - Отступ слева в пикселях
Right - Отступ справа в пикселях
Top - Отступ сверху в пикселях
Bottom - Отступ снизу в пикселях
Windows
#Include "window9.bi"
Using window9
Dim Po As SinglePoint
Dim font As FontPrint
font.Name_="Arial"
font.size=22
font.Italic=1
Dim As Integer X=30,X1=15,Y=30,Y1=10
StartPrinter(@po)
PageStart()
FramePage(X,X1,Y,Y1)
FontPrinter(@font)
PrintText("FreeBasic very good programming language")
PageEnd()
StopPrinter()
Created with the Personal Edition of HelpNDoc: Free EBook and documentation generator