Помещает в массив переменных памяти имена принтеров, которые в данный момент описаны в Диспетчере печати Windows.

Синтаксис:
APRINTERS(ArrayName)

Параметры:
ArrayName
Задает имя массива, содержащего имена установленных принтеров и соответствующих им портов. Если задано имя несуществующего массива, Visual FoxPro автоматически создает такой массив. Если задано имя существующего массива, который не в состоянии вместить всю информацию о принтерах, Visual FoxPro автоматически увеличивает размер массива надлежащим образом. Если в массиве больше элементов, чем необходимо, он укорачивается. Если массив уже существует и функция APRINTERS() возвращает 0 из-за отсутствия установленных принтеров, массив не изменяется. Если массив не существует и функция APRINTERS() возвращает 0, массив не создается.

Результат:
Числовой

Комментарии:
Функция APRINTERS() создает двумерный массив. Первый столбец массива содержит имена установленных в данный момент принтеров, а второй столбец ѕ порты, к которым эти принтеры подсоединены.
Функция APRINTERS() возвращает число установленных принтеров. Если установленных принтеров нет, APRINTERS() возвращает 0.
Visual FoxPro получает имена установленных принтеров и соответствующих портов из Windows. Однако Visual FoxPro не проверяет, подключены ли в действительности эти принтеры к данному компьютеру.

Пример:

* В следующем примере APRINTERS( ) используется для создания массива
* gaPrinters, который содержит имена и порты установленных принтеров.
* Затем имена принтеров и их порты выводятся на экран. Если принтеры не
* установлены, выводится сообщение.
IF APRINTERS(gaPrinters) > 0  && If there are installed printer drivers
	CLEAR	&& Clear the main Visual FoxPro window
	DISPLAY MEMORY LIKE gaPrinters	&& Display the printers and ports
ELSE	&& Otherwise, no printer are installed
	WAIT WINDOW 'No printers installed.'
ENDIF