Управление выводом в Visual FoxPro

Вывод командами \ | \\, ? | ?? и TEXT … ENDTEXT будет осуществляться на принтер, если установить SET PRINTER в ON, и будет направляться в порт или в текстовый файл, если вдобавок употребить SET PRINTER с опцией TO.

Пример:

&& Вывод на принтер, предваряемый открытием окна

&& настройки принтера и параметров печати

set printer on prompt

\Этот текст выводится на принтер

Можно избежать передачи сообщений принтеру, когда он не готов к приему информации, если употребить функции PRINTSTATUS( ) или SYS(13), возвращающие соответственно .T. или 'READY', если принтер готов; в противном случае команды вернут соответственно .F. или 'OFFLINE'.

if PrintStatus( )

                                            set printer on prompt

                                            \Этот текст выводится на принтер

else

MessageBox("Убедитесь, что принтер подсоединен и включен")

endif

Если PRINTSTATUS( ) или SYS(13) не используются и передача данных на принтер невозможна, то при выполнении SET PRINTER ON может возникнуть ошибка, например Printer is not ready.

Шрифт, используемый при выводе, устанавливается командой SET PRINTER FONT.