Этот образец показывает вам, как обращаться к Windows Registry с помощью родных команд DECLARE-DLL Visual FoxPro. Windows API предоставляет ряд функций, которые вы можете использовать для доступа, чтения из регистра и записи в регистр. Библиотека класса Registry.prg в ...\Samples\Classes содержит определение класса, который выставляет эти функции в качестве методов, которые вы можете вызывать в ваших приложениях.

Содержимое закладки Field Mapping (Разметка полей) диалогового кона Options (Параметры) Visual FoxPro и определение Label (для именования полей) хранится в регистре. Поскольку многие из этих установок недоступны через использование функций SET, вы можете использования функции класса для получения доступа к этим значениям в регистре. Приведенный ниже код заполняет массив всеми установками диалогового окна Options (Параметры):

	Скопировать код
regfile = HOME(2)+"classes\registry.prg" SET PROCEDURE TO (m.regfile) ADDITIVE oReg = CreateObject("FoxReg") DIMENSION aFoxOptions[1,2] m.nErrNum = oReg.EnumFoxOptions(@aFoxOptions)

Приведенный ниже код вызывает метод SetFoxOption в классе FoxReg, определенном в Registry.prg для установки TALK OFF в регистре Windows:

	Скопировать код
regfile = HOME(2)+"classes\registry.prg" SET PROCEDURE TO (m.regfile) ADDITIVE oReg = CreateObject("FoxReg") m.nErrNum = oReg.SetFoxOption("TALK","OFF")

Задачи

Справочное руководство

Прочие ресурсы