Навигация
Главная
Поиск
Форум
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
Модуль Forms 62832
Создание отчето... 62825
ТЕХНОЛОГИИ ДОСТ... 59358
Пример работы с... 58083
Имитационное мо... 54756
Реклама
Сейчас на сайте
Гостей: 10
На сайте нет зарегистрированных пользователей

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

Расчет размера дохода на одного человека в Turbo Pascal
База данных склада на Delphi + Схема БД
Моделирование интернет магазина (Apache, Php, Html) на 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 Комментариев · 7257 Прочтений · Для печати

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
PDJPack
Самоучитель C++
RbControls
PCX
Архив значков
Программирование ...
Доступа к БД Fire...
DS_Group
База каталогов ( ...
SysInfo [Исходник...
SendSMS для PHP-F...
Binary2XMLDemo (Р...
PHP, MySQL и Drea...
Exe in exe
Delphi и технолог...
Calendar
Crypt32
RAS
DeleteEdit
Sztransppanel

Топ загрузок
Приложение Клие... 100422
Delphi 7 Enterp... 84985
Converter AMR<-... 20062
GPSS World Stud... 11985
Borland C++Buil... 11408
Borland Delphi ... 8388
Turbo Pascal fo... 7008
Visual Studio 2... 4985
Калькулятор [Ис... 4631
FreeSMS v1.3.1 3530
Случайные статьи
Как расколоть орешек
ОБРАЗОВАНИЕ ПЕРВОГ...
Создание блога в L...
• Какое имя присво...
Добавление нового ...
Предварительный пр...
Создание программн...
Храбрость
вопросами организа...
Целые типы
Законы эмпирическо...
Добавить произволь...
Класс TMetafile
Как слать письма в...
Разработать прикла...
Можно работать!
Работа с внешней п...
Когда использовать...
Стандартные логиче...
Процедура SetBkCol...
Задача №3. Необход...
Пример создания по...
Основные понятия п...
Цели, стоящие пере...
Тестирование файлов
Статистика



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


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