20168

Использование функций WinAPI

Лекция

Информатика, кибернетика и программирование

DECLARE –DLL Регистрирует функцию во внешней 32разрядной библиотеке динамических связей Windows . Чтобы удалить зарегистрированные функции из памяти выдайте команду CLEAR ALL или CLEAR DLLS.

Русский

2013-07-25

32.5 KB

13 чел.

ПРИМЕРЫ.

1. Использование функций WinAPI.

.dll – библиотеки интерфейса прикладного программирования (Application Program Interface). Библиотеки API-программ расширяют возможности языка и пользовательского интерфейса. Открыв внешнюю библиотеку API, вы можете пользоваться API-функциями точно также, как функциями VFP. С помощью команды Display Status или LIST STATUS можно отобразить список имеющихся в библиотеке функций.

DECLARE –DLL - Регистрирует функцию во внешней 32-разрядной библиотеке динамических связей Windows (.DLL).

Синтаксис:

DECLARE [cFunctionType] FunctionName IN LibraryName [AS AliasName]

[cParamType1 [@] ParamName1,

 cParamType2 [@] ParamName2, ...]

Параметры:

cFunctionType

Указывает, имеет ли 32-разрядная .DLL-функция системы Windows возвращаемое значение. Аргумент cFunctionType включается, если функция имеет возвращаемое значение; в противном случае cFunctionType опускается.

cFunctionType может принимать следующие значения:

cFunctionType Описание

SHORT 16-разрядное целое число

INTEGER 32-разрядное целое число

SINGLE 32-разрядное число с плавающей запятой

DOUBLE 64-разрядное число с плавающей запятой

STRING Символьная строка

FunctionName

Задает имя 32-разрядной .DLL-функции Windows для регистрации в Visual FoxPro. Обратите внимание: в имени FunctionName важен регистр символов.

Имя 32-разрядной .DLL-функции Windows может отличаться от описания в документе Win32 API. Например, функцию MessageBox следует назвать MessageBoxA (для однобайтных символов) или MessageBoxW (для UNICODE). Если Visual FoxPro не может найти 32-разрядную .DLL-функцию Windows, заданную аргументом FunctionName, к концу имени функции присоединяется буква A, и Visual FoxPro повторяет поиск, используя новое имя.

Если имя заданной 32-разрядной .DLL-функции Windows совпадает с именем функции Visual FoxPro или является недопустимым именем Visual FoxPro, включите имя 32-разрядной .DLL-функции Windows в качестве FunctionName и присвойте этой функции допустимое имя Visual FoxPro с помощью предложения AS, описанного ниже.

IN LibraryName

Задает имя внешней библиотеки .DLL в Windows, которая содержит 32-разрядную .DLL-функцию Windows ѕ FunctionName. Если задать WIN32API в качестве LibraryName, Visual FoxPro ищет 32-разрядную .DLL-функцию Windows в библиотеках KERNEL32.DLL, GDI32.DLL, USER32.DLL, MPR.DLL и ADVAPI32.DLL.

AS AliasName

Задает псевдоним для имени 32-разрядной .DLL-функции Windows, которое совпадает с именем некоторой функции Visual FoxPro или является недопустимым именем Visual FoxPro. В качестве AliasName нельзя использовать зарезервированное слово Visual FoxPro или имя 32-разрядной .DLL-функции Windows, уже зарегистрированное в Visual FoxPro.

Пользуйтесь псевдонимом AliasName для вызова 32-разрядной .DLL-функции Windows. В AliasName несущественен регистр символов.

cParameterType1 [@] ParamName1, cParameterType2 [@] ParamName2, ...

Задает типы параметров, передаваемых в 32-разрядную .DLL-функцию Windows.

Аргумент cParameterType является обязательным; он задает тип параметра, ожидаемый 32-разрядной .DLL-функцией Windows. cParameterType может принимать одно из следующих значений:

cParameterType Описание

INTEGER 32-разрядное целое число

SINGLE 32-разрядное число с плавающей запятой

DOUBLE 64-разрядное число с плавающей запятой

STRING Символьная строка

Если параметры не принадлежат типу, ожидаемому 32-разрядной .DLL-функцией Windows, Visual FoxPro генерирует ошибку. Неопределенное значение может быть передано как символьная строка.

Чтобы при вызове функции передать параметр по ссылке, в данной команде после параметра cParameterType и в вызывающей функции перед соответствующей переменной нужно поставить символ @. Если не поставить @ в команде DECLARE и/или в вызывающей функции, параметр будет передан по значению. О .DLL-функциях, требующих включения @ для передачи параметров по ссылке, см. документ Microsoft Win32 Programmer's Guide.

Замечание  Имена параметров ParamName1, ParamName2 и т.д. не являются обязательными и не используются в Visual FoxPro или в 32-разрядной .DLL-функции Windows. Их можно задать для напоминания о том, какие имена и типы параметров получает функция.

Комментарии

Перед тем, как вызывать 32-разрядную .DLL-функцию Windows из Visual FoxPro, необходимо выдать команду DECLARE с именем этой функции, именем содержащей ее библиотеки .DLL и типами параметров, которые функция ожидает получить.

Чтобы отобразить имена зарегистрированных функций, выдайте команду DISPLAY STATUS или LIST STATUS. Чтобы удалить зарегистрированные функции из памяти, выдайте команду CLEAR ALL или CLEAR DLLS.

ПРИМЕР: Пользователь запускает программу и набирает пароль (МАША – регистр русский). Ответ ему- пароль неверный. Приходится сначала переключиться в английский регистр, а затем снова набрать пароль. Избежать этого можно, если использовать следующую процедуру. Вызываться она может, например, в методе Activate формы.

DECLARE SHORT GetKeyboardLayoutName IN user32.dll STRING @lpr

lpr = ‘  ’

= GetKeyboardLayoutName(@lpr)

DECLARE SHORT ActivateKeyboardLayout IN user32.dll INTEGER HKL, INTEGER flags

if not ‘419’ $lpr

=ActivateKeyboardLayout(1,0)

endif


 

А также другие работы, которые могут Вас заинтересовать

12910. ТОРГІВЛЯ ЛЮДЬМИ – ЦЕ МОЖЕ ТРАПИТИСЬ З КОЖНИМ 33.96 KB
  ВИХОВНА ГОДИНА З ЕЛЕМЕНТАМИ ТРЕНІНГОВОГО ЗАНЯТТЯ НА ТЕМУ ТОРГІВЛЯ ЛЮДЬМИ – ЦЕ МОЖЕ ТРАПИТИСЬ З КОЖНИМ Мета: підвищення рівня поінформованості учнів щодо проблеми торгівлі людьми. Завдання: виявити рівень поінформованості учнів щодо проблеми торгівлі л
12911. Основи правосвідомості особистості 19.79 KB
  Орієнтовні форми класних годин. Години спілкування: Основи правосвідомості особистості Брейнринг Конституційні основи держави Історія та сучасність рідного краю Тренінг Мої права та обовязки Диспут Активна життєва позиція. Навіщо вона мені На...
12912. Моя чудова рідна мова 39.5 KB
  МОЯ ЧУДОВА РІДНА МОВА ВИХОВНИЙ ЗАХІД ПРИСВЯЧЕНИЙ МІЖНАРОДНОМУ ДНЮ РІДНОЇ МОВИ Тема: Моя чудова рідна мова Мета: Розширити знання учнів про рідну мову формувати розуміння того що мова – скарб народу розвивати комунікативну компетентність учнів виховувати п
12913. Хліб - скарб найбільший на землі 2.37 MB
  Виховна година на тему: Хліб скарб найбільший на землі Хліб скарб найбільший на землі Мета. Ознайомити учнів з обрядами та звичаями нашого народу де окрасою є хліб; виховувати пошану до хліборобської праці до найдорожчого що є в людини хліба; виховувати по
12914. Ми матір називаємо святою 400 KB
  Виховна година на тему: Ми матір називаємо святою Мета. Виховати в учнів почуття любові шани поваги до найріднішої людини для кожного з нас – МАТЕРІ. Обладнання. Плакати з прислівями віршами піснями та портретами. Викладач. Всі найсвятіші почуття проб...
12915. НЕМАЄ ДЛЯ НАС КРАЩОЇ ЗЕМЛІ, НІЖ НАША УКРАЇНА 563.5 KB
  Виховна година на тему: немає для нас кращої землі ніж наша Україна Мета. Виховувати почуття любові до Батьківщини почуття патріотизму та гордості за український рід. Обладнання. Вишиті рушники українське народне вбрання краєвиди різних регіонів України зо
12916. Действия пожарных спасателей по тушению пожаров в зданиях повышенной этажности 2.3 MB
  Изучить оперативно-тактическую характеристику зданий повышенной этажности. Возможную обстановку при пожарах. Разведку пожара. Спасение людей при пожаре. Ознакомиться с основными схемами подачи воды.
12917. Живи моя Держава, Україно 417 KB
  Виховна година на тему: Живи моя Держава Україно Мукачево 2007 Мета. Виховувати почуття любові до Батьківщини почуття патріотизму та гордості за приналежність до великого народу. Обладнання. Вишиті рушники українське народ...
12918. Виховні заходи. Виховні години 205 KB
  Зміст Виховна година Подорож до країни Ввічливості Виховна година Подорож до лісової аптеки. Виховна година Дотримуйся правил дорожнього руху. Презентація 1 класу Будьмо знайомі. Виховна година Червона калина – символ України. Родинне с...