Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Содержание сайт... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Создание отчето... 65425
Модуль Forms 65187
Пример работы с... 64352
ТЕХНОЛОГИИ ДОСТ... 61834
Имитационное мо... 57755
Реклама
Сейчас на сайте
Гостей: 4
На сайте нет зарегистрированных пользователей

Пользователей: 13,085
новичок: nikita222dolban
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Моделирование круглосуточного интернет кафе на GPSS + Отчет
Лабораторная работа по динамическим спискам на Turbo Pascal (перемещение...
Моделирование работы аэропорта на GPSS + Пояснительная записка

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
Неявная загрузка модуля DLL



Для того чтобы использовать неявную загрузку модуля, достаточно описать
процедуры и функции этого модуля, которые вы будете задействовать в сво-
ем приложении (лучше сделать это в отдельном модуле unit). Такое описа-
ние состоит из имени функции (процедуры), под которым она будет ис-
пользована в приложении, зарезервированного слова external, строки с име-
нем файла библиотеки DLL, зарезервированного слова name и строки,
содержащей имя функции (процедуры) в динамическом модуле. Следующий
программный код содержит такое описание.
Описание внешних процедур и функций модуля DLL в приложении
function CreateWord_DLL:boolean;
external 'dserver.dll' name 'CreateWord';
function VisibleWord_DLL(kod_:boolean):boolean;
external 'dserver.dll' name 'VisibleWord';
function AddDoc_DLL(filename_:string):variant;
external 'dserver.dll' name 'AddDoc';
function FindAllAndPasteTextDoc_DLL(document:variant; findtext_,
pastetext_:string):booiean;
external 'dserver.dll' name 'FindAllAndPasteTextDoc';
function OpenDoc_DLL(file_:string):variant;
external 'dserver.dll' name 'OpenDoc';
function CopyTextDocToClipboard_DLL(document:variant):boolean;
external 'dserver.dll' name 'CopyTextDocToClipboard';
function ImportTextFromDoc_DLL(document:variant):string;
external 'dserver.dll1 name 'ImportTextFromDoc';
function CloseDocEx_DLL(document:variant;saved_:boolean):boolean;
external 'dserver.dll' name 'CloseDocEx';
function CloseWord_DLL:boolean; external 'dserver.dll' name 'CloseWord';



Если модуль DLL откомпилирован, размещен на диске компьютера и дос-
тупен приложению, а описание процедур и функций этого модуля в исполь-
зующем его приложении не содержит ошибок, то приложение запустится
без проблем. Тогда во время запуска приложения также будет загружен ди-
намический модуль. Если файл DLL не доступен приложению, которое его
использует и загружает неявно, то загрузка приложения вызовет ошибку.
Если в модуле отсутствует функция, описываемая в приложении, то это
также вызовет ошибку (рис. 17.5 и 17.6).

Рис. 17.5. Ошибка загрузки модуля DLL

Рис. 17.6. Ошибка при отсутствии в модуле DLL функции, описанной в приложении
Достоинство метода неявной загрузки модуля DLL заключается в простоте
его использования. Недостаток метода проявляется во время загрузки при-
ложения на выполнение, если описания функций (процедур) в приложении
и модуле не совпадают. Для решения этой проблемы приходится или
корректировать исходный текст приложения или исправлять ошибки в мо-
дуле DLL.
Используем созданную библиотеку в приложении Delphi.
Создание документа на основе шаблона (неявная загрузка модуля)
procedure TForml.Button8Click(Sender: TObject);
begin
// Создаем новый документ по шаблону
document:=AddDoc_DLL(ExtractFileDir(Application.ExeName)+
'\Шаблон конверта.dot');
messagebox(handle,'Шаблон почтового конверта создан!','Внимание!',О);
// Подставляем адрес
FindAllAndPasteTextDoc_DLL(document,'###индекс&', '350049');
FindAllAndPasteTextDoc_DLL(document,'###адрес&',
'Краснодар, ул. Севастопольская, д. 3, кв. 123');
FindAllAndPasteTextDoc_DLL(document,'###получатель&',
'Иванов Иван Иванович');
// Обратный адрес
FindAllAndPasteTextDoc_DLL(document,'###обратный индекс&','198005');
FindAllAndPasteTextDoc_DLL(document,'###обратный адрес&',
'Санкт-Петербург, Измайловский пр., д. 29, кв. 111');
FindAllAndPasteTextDoc_DLL(document,'##Отправитель&',
'Петрова Светлана Ивановна');
end;



В большинстве случаев более удобно использовать явную, или динамиче-
скую загрузку модуля DLL. Это связано с тем, что даже если будут измене-
ны некоторые функции модуля, то на загрузке приложения это никак не
отразится. Не будут выполняться только те функции и процедуры, которые
были ошибочно изменены.
Опубликовал Kest October 05 2009 17:56:17 · 0 Комментариев · 7401 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
Illusion
FormShape [Исходн...
Система баннеро...
isoCanvas (Редакт...
Карта сайта
TelBook
IMtale
Java 2. Наиболее ...
Определние размер...
Animation Effect ...
PHP 5. Полное рук...
Мониторинг сервер...
XPATComponents
Панель Наша Кнопка
Мод "проверочный ...
Geo-Whois
Обучение Borland ...
LaserTank [Исходн...
EditNew
Ранги для форума

Топ загрузок
Приложение Клие... 100469
Delphi 7 Enterp... 87052
Converter AMR<-... 20078
GPSS World Stud... 12819
Borland C++Buil... 11831
Borland Delphi ... 8603
Turbo Pascal fo... 7039
Visual Studio 2... 4999
Калькулятор [Ис... 4799
FreeSMS v1.3.1 3542
Случайные статьи
Попытк обыграть си...
Когда наступает по...
Ввод двух символьн...
Система оптимизаци...
Сегментные регистры
Старший и младший ...
Компиляция - Проло...
Помещение формы в ...
Сбор данных с прим...
Программироание: а...
Листинг 13.3. Испо...
Обзор панели управ...
Есть несколько ста...
Общие настройки
Игра «Домино» [Vis...
Режим с обострением
Видео Киев.
IBS Вы можете пред...
Разделение списка ...
Триггеры событий, ...
ХАЛЯВНЫЙ NET(2)
Редактирование диз...
Урок 3. Продолжаем...
Ввод элементарных ...
Монтаж вывески
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?