FoxPro Club Главная

Конференция Решения Фотоальбом Сайт М.Дроздова Статьи Файловый архив Книга Visual FoxPro 9.0 Русский Help для Visual FoxPro
Пользователей: 9210
Вход
Управление принтером

В предлагаемой библиотеке собраны вызовы API функций, позволяющие считывать и устанавливать некоторые параметры выбранного принтера.


 
Прислал: Ившев Дмитрий   Категория: Разное


Управление принтером

Настоящий вариант библиотеки теперь корректно работает со всеми версиями Windows, исправления внесены при участии мастера Delphi - Владимира Тарасова(wtar@yandex.ru). Прилагаемый пример кроме управления принтером, демонстрирует способ установки параметров отчета. Используется известный способ корректировки служебных полей Tag, Tag2 и Expr. Так же показано, как можно устанавливать верхнее и левое поле отчета.
 
Сделайте оценку этого решения Плохо Удовлетворительно Так себе Хорошо Отлично Текущая оценка: (4.88) Вложение [43.42]kb
Дополнения пользователей
Управление принтером
[+][?]
Елена
19.01.02 07:01:50

Что за функции GetRegValue и SetRegValue? В документации ни слова.
Ившев Дмитрий
19.01.02 10:54:52

	В данном случае, как слышится так и пишется.
	GetRegValue(nHkey,cRegKey,cParameterName) Возвращает значение указанного параметра.
	Тип возвращаемого значения: Character
	Формат возвращаемого значения: <Значение>:<Идентификатор типа>. Идентификатор типа принимает одно
из следующих значений: REG_BINARY - 3, REG_DWORD  - 4, REG_DWORD_BIG_ENDIAN - 5, REG_EXPAND_SZ -
2, REG_LINK - 6, REG_MULTI_SZ - 7, REG_NONE - 0, REG_RESOURCE_LIST - 8,
REG_SZ - 1.
	Аргументы: nHkey - идентификатор корня реестра, со стандартными значениями: HKEY_CLASSES_ROOT -
(-2147483648), HKEY_CURRENT_USER - (-2147483649),         HKEY_LOCAL_MACHINE - (-2147483650),
HKEY_USERS - (-2147483651);
                   cRegKey - имя раздела;
                   cParameterName - имя параметра
	SetRegValuenHkey,cRegKey,cParameterName,cParameterValue) Устанавливает значение указанного
параметра, ничего не возвращает.
	Пример использования.
decl string GetRegValue in printer.dll integer,string,string
decl        SetRegValue in printer.dll integer,string,string,string
priv cOldValue
     cOldValue=GetRegValue(-2147483646,'Config\0001\Display\Settings','DPILogicalX')
     cOldValue=left(cOldValue,len(cOldValue)-2)
wait wind 'Old:'+GetRegValue(-2147483646,'Config\0001\Display\Settings','DPILogicalX')
=SetRegValue(-2147483646,'Config\0001\Display\Settings','DPILogicalX','192')
wait wind 'New:'+GetRegValue(-2147483646,'Config\0001\Display\Settings','DPILogicalX')
=SetRegValue(-2147483646,'Config\0001\Display\Settings','DPILogicalX',cOldValue)
	В описание функции не были включены потому, что прилагаемый к решению пример, никак не связан с
реестром. Тем более, что многие пользуются кодом из Samples.

w9999
31.07.07 02:02:42

Добавить бы еще функции GetPaperBin и SetPaperBin, для установки выходных лотков по умолчанию, это
было бы ....
[Дополнить]



© 2000-2017 Fox Club 
При размещении любых материалов с сайта на других ресурсах- прямая ссылка на www.foxclub.ru обязательна
Яндекс.Метрика