Библиотеката на динамичните връзки (DLL) е колекция от рутинни програми (малки програми), които могат да бъдат извикани от приложения и други DLL файлове. Подобно на единици, те съдържат код или ресурси, които могат да се споделят между множество приложения.
Концепцията за DLL е ядрото на архитектурния дизайн на Windows и в по-голямата си част Windows е просто колекция от DLL файлове.
С Delphi можете да пишете и използвате собствените си DLL файлове и дори да обаждате функции, независимо дали са разработени или не с други системи или разработчици, като Visual Basic, или C / C ++.
Създаване на библиотека с динамични връзки
Следващите няколко реда ще покажат как да създадете обикновена DLL с помощта на Delphi.
За начало стартирайте Delphi и отидете на Файл> Ново> DLL за изграждане на нов DLL шаблон. Изберете текста по подразбиране и го заменете с този:
библиотека TestLibrary;
употреби SysUtils, класове, диалози;
процедура DllMessage; износ;започвам
ShowMessage („Здравейте, свят от DLL Delphi“);
край;
износа DllMessage;
beginend.
Ако погледнете файл на проекта на всяко приложение на Delphi, ще видите, че то започва със запазената дума програма. За разлика от тях, DLL файловете винаги започват с библиотека и след това a употреби клауза за всички единици. В този пример DllMessage следва процедура, която не прави нищо друго, а показва просто съобщение.
В края на изходния код е ан износа изявление, което изброява рутините, които действително се експортират от DLL, по начин, по който те могат да бъдат извикани от друго приложение. Това означава, че можете да имате, да речем, пет процедури в DLL и само две от тях (изброени в износа раздел) може да се извика от външна програма (останалите три са „подпроцедури“).
За да използваме тази DLL, трябва да я компилираме чрез натискане Ctrl + F9. Това трябва да създаде DLL, наречена SimpleMessageDLL.DLL в папката ви с проекти.
И накрая, нека да разгледаме как да извикаме DllMessage процедурата от статично заредена DLL.
За да импортирате процедура, съдържаща се в DLL, можете да използвате ключовата дума външен в процедурната декларация. Например, като се има предвид процедурата на DllMessage, показана по-горе, декларацията в призоваващото приложение ще изглежда така:
процедура DllMessage; външен "SimpleMessageDLL.dll"
Реалното обаждане към процедура е нищо повече от:
DllMessage;
Целият код за формуляр на Delphi (име: Form1), с TButton (с име Button1), която извиква функцията DLLMessage, изглежда така:
мерна единица Unit1;
интерфейс
употреби
Windows, Съобщения, SysUtils, Варианти, Класове,
Графика, контроли, форми, диалози, StdCtrls;
Тип
TForm1 = клас (TForm)
Бутон1: TButton;
процедура Button1Click (Sender: TObject);частен{Частни декларации}обществен{Публични декларации}край;
Var
Форма1: TForm1;
процедура DllMessage; външен "SimpleMessageDLL.dll"
изпълнение
{$ R * .dfm}
процедура TForm1.Button1Click (Подател: TObject);започвам
DllMessage;
край;
край.