Отворената среда за програмиране на Delphi се основава на използването на различни компоненти. Компонентът е код, който изпълнява конкретна задача, използвайки свойства, събития и процедури. Когато създавате компонент, трябва да зададете стойностите на променливите и да приложите кода на обработчиците на събития. За да се използва в програмата, новият компонент трябва да бъде включен в пакета на проекта.
Необходимо е
Среда за разработка на Delphi
Инструкции
Етап 1
Изберете типа компонент, който да създадете. Това може да бъде елемент на Windows, графичен елемент, контролен обект или невизуален компонент. Също така вашият обект може да наследява от всеки съществуващ клас. Вземете решение за функциите, които ще възложите на компонента да се изпълни.
Стъпка 2
Стартирайте средата за разработка на Delphi. В главното меню на приложението отворете елементите Компонент, Нови компоненти. В диалоговия прозорец, който се появява, в полето Ancestor Type изберете класа на компонента, който искате да промените. Ако не използвате наследяване, в полето Име на клас просто въведете име за новия компонент, което започва с буквата "T". В полето Palette Page напишете името на раздела на компонента след инсталацията, след което щракнете върху бутона Create Unit. Средата за разработка автоматично ще генерира шаблон за новия компонент. Пример за генерирания код на Pascal:
единица MyBtn;
интерфейс
използва
Windows, SysUtils, съобщения, класове, контроли, графика, формуляри, StdCtrls, диалогови прозорци;
Тип
TMyBtn = клас (TButton)
частни
защитен
публично
публикувано
край;
процедура Регистър;
изпълнение
процедура Регистър;
започнете
RegisterComponents ('MyComponents', [TMyBtn]);
край;
край.
В същото време не само се формира нов клас TMyBtn въз основа на стандартния клас на бутона TButton, но също така е описана процедурата за регистриране на нов компонент в палитрата на компонентите.
Стъпка 3
В частната директива опишете всички полета, процедури и функции, които са ви необходими за създаване на компонента, и те ще имат статуса на скрити. Посочете името на полето (с буквата "F"), неговия тип. Например запис на формата FDatas: integer описва променлива FDatas от цяло число. В защитения раздел избройте нужните ви манипулатори на събития, например от натискане на клавиатура или мишка. Освен това, когато наследявате клас, трябва да зададете ключовата дума override - за да припокриете родителския манипулатор на стандартното събитие. Например процедурата за влизане Щракнете; override гарантира, че щракването на мишката върху бутона е прихванато.
Стъпка 4
Функциите и процедурите на компонента, достъпни за потребителя, са описани в публичните и публикувани директиви, например, като се използва запис на формата: функция TSysInfo. GetUser: низ или свойство MachName: низ. В последната директива, когато използвате думата свойство, можете да посочите свойства, които ще бъдат достъпни в инспектора на обекти.
Стъпка 5
Напишете действителния код за функционирането на компонента в декларираните процедури и функции. Примерен код на манипулатора:
функция MachName: низ;
вар
p: цяло число;
с: PChar;
започнете
c: = stralloc (p);
край;
край.
Стъпка 6
Инсталирайте компонента в проекта, от който се нуждаете. От главното меню на Delphi изберете Component, Install Component. В диалоговия прозорец, който се появява, отворете един от разделите: В съществуващ пакет, ако искате да инсталирате компонента в съществуващ пакет, или В нов пакет - в нов. Щракнете върху OK и потвърдете заявката на приложението за презаписване на пакета (ако е необходимо). След това писменият компонент ще бъде готов за употреба.
