74961-1 (751171)
Текст из файла
Что такое API ?
API - это сокращение от Application Programming Interface. В общем каждая программа, операционная система и т.д. имеет свой API. Windows - API состоит из целого ряда функций, которые позволяют Вам использовать системные Windows-конструкции. Все Windows-API-функции были написаны в C++, но ваши программы смогут спокойно их использовать из Visual Basic'a. API-функции должны быть обязательно продекларированы! Декларация API-функций имеет следующий синтаксис:
[Public | Private] Declare Function name Lib "libname" [Alias "aliasname"] [([arglist])] [As type]
Ключевое слово Lib указывает, в какой библиотеке Visual Basic может найти нужную функцию. Имеются в виду библиотеки динамических связей (*.dll). Но в aliasname указывать расширение не надо. Alias указывает под каким именем программа должна искать заданую функцию в библиотеке. Arglist - это передаваемые параметры.Windows-API позволяет две вещи: проведение определённых заданий и доступ к системным ресурсам. Список различных API-функций и их деклараций Вы можете просмотреть при помощи стандартной программы API-Viewer.
Примечание: Если АPI-функция ждёт от вас переменной, Вы должны обязательно объявить её и заполнить пробелами. Т.е. переменная должна быть определённой пользователем. Это черты языка С++, на котором и был написан Windows-API.
Рассмотрим пару примеров:
Допустим, ваше приложение должно определять каталог, в котором установлена операционная система Windows 95/98/NT. Сделать это проще всего, использовав API-функцию GetWindowsDirectory.
1. В модуле декларируем API-функцию GetWindowsDirectory:
Declare Function GetWindowsDirectory Lib "kernel32" Alias _
"GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal _
nSize As Long) As Long
2. В модуле объявляем переменную, допустим, WinDir, которой должно быть присвоено имя директории.
Public WinDir As String
3. В подпрограмму вписываем:
Переменную, которую надо передать API, мы уже объявили и теперь заполняем пробелами.
Пробелов должно быть примерно столько, сколько примерно символов должна иметь переменная.
В этом случае хватит и 20, т.к. Windows обычно устанавливают в С:\Windows или C:\Win95, и т.д. Т.е. сумма символов, скорее всего не превысит 20
WinDir = Space(20)
Debug.Print Left(WinDir, GetWindowsDirectory(WinDir, 20))
Т.к. API является функцией, то она должна возвращать какое-то значение. В данном случае функция GetWindowsDirectory возврашает длину искомого значения. Т.е. если, например, искомое значение это C:\WINDOWS, то функция вернёт значение 10.
'Переменная же имеете длину 20. Эти 10 символов записываются первыми, а дальше идут 10 пробелов. Зачем нам, спрашивается, лишние 10 символов? Ведь это используется ненужная память...
Поэтому инструкцией Left мы из переменной WinDir вытаскиваем ровно столько первых символов, сколько вообще нужных...
Второй пример:
Например, ваша программа должна определить какой из ваших носителей есть CD-ROM или удалённый и т.д. "Родной" инструментарий Visual Basica сделать этого не позволяет - приходится прибегать к помощи API-функции .
1. В модуле декларируем API-функцию GetDriveType:
Declare Function GetDriveType Lib "kernel32" Alias _
"GetDriveTypeA" (ByVal nDrive As String) As Long
Под параметром nDrive подрзумевается, буква латинского алфавита плюс двоетечие, т.е. потенциальное имя дисковода, например C:
2. В подпрограмму вписываем:
здесь цикл For...Next "подсовывает" функции GetDriveType все буквы латинского алфавита по очереди. Функция Chr преобразовывает значения таблицы ASCII (от 0 до 255) в буквы. Так вот 65 это буква A, a 90 это Z
Dim myDrive As Integer
For myDrive = 65 To 90
Debug.Print Chr(myDrive) & ":" & " - " & GetDriveType(Chr(myDrive) & ":")
Next
Вот что возвратит функция GetDriveType нам, например у меня:
A: - 2
C: - 3
D: - 3
E: - 5
Все остальные буквы помечены цифрой 1. Да, что бы понять эти обозначения нужно знать следующую таблицу:
Имя константы: Значение:
DRIVE_UNKNOWN | 0 |
DRIVE_NO_ROOT_DIR | 1 |
DRIVE_REMOVEABLE | 2 |
DRIVE_FIXED | 3 |
DRIVE_REMOTE | 4 |
DRIVE_CDROM | 5 |
DRIVE_RAMDISK | 6 |
Подпрограмма Main в модуле является как Form_Load на форме, т.е. считается главной и загружается по умолчанию.
О предназначениях многих API функций можно легко догадаться по их названию. Например, GetWindowsDirectory (получить директорию Windows) или GetDriveType (получить тип носителя).
Список литературы
Для подготовки данной работы были использованы материалы с сайта http://visualprogs.narod.ru/
Характеристики
Тип файла документ
Документы такого типа открываются такими программами, как Microsoft Office Word на компьютерах Windows, Apple Pages на компьютерах Mac, Open Office - бесплатная альтернатива на различных платформах, в том числе Linux. Наиболее простым и современным решением будут Google документы, так как открываются онлайн без скачивания прямо в браузере на любой платформе. Существуют российские качественные аналоги, например от Яндекса.
Будьте внимательны на мобильных устройствах, так как там используются упрощённый функционал даже в официальном приложении от Microsoft, поэтому для просмотра скачивайте PDF-версию. А если нужно редактировать файл, то используйте оригинальный файл.
Файлы такого типа обычно разбиты на страницы, а текст может быть форматированным (жирный, курсив, выбор шрифта, таблицы и т.п.), а также в него можно добавлять изображения. Формат идеально подходит для рефератов, докладов и РПЗ курсовых проектов, которые необходимо распечатать. Кстати перед печатью также сохраняйте файл в PDF, так как принтер может начудить со шрифтами.