Otevřené programovací prostředí společnosti Delphi je založeno na použití různých komponent. Komponenta je kód, který provádí konkrétní úkol pomocí vlastností, událostí a postupů. Při vytváření komponenty musíte nastavit hodnoty proměnných a implementovat kód obslužných rutin událostí. Pro použití v programu musí být nová součást obsažena v balíčku projektu.
Je to nutné
Vývojové prostředí Delphi
Instrukce
Krok 1
Vyberte typ komponenty, kterou chcete vytvořit. Může to být položka systému Windows, grafický prvek, ovládací prvek nebo nevizuální komponenta. Váš objekt může také dědit z jakékoli existující třídy. Rozhodněte se o funkcích, které přiřadíte komponentě k implementaci.
Krok 2
Spusťte vývojové prostředí Delphi. V hlavní nabídce aplikace otevřete položky Komponenta, Nová komponenta. V dialogovém okně, které se objeví, v poli Typ předka vyberte třídu komponenty, kterou chcete upravit. Pokud nepoužíváte dědičnost, zadejte do pole Název třídy jednoduše název nové komponenty, který začíná písmenem „T“. Do pole Stránka palety napište po instalaci název záložky komponenty a poté klikněte na tlačítko Vytvořit jednotku. Vývojové prostředí automaticky vygeneruje šablonu pro novou komponentu. Příklad generovaného kódu Pascal:
jednotka MyBtn;
rozhraní
používá
Windows, SysUtils, zprávy, třídy, ovládací prvky, grafika, formuláře, StdCtrls, dialogy;
typ
TMyBtn = třída (TButton)
soukromé
chráněný
veřejnost
zveřejněno
konec;
procedura Registrovat;
implementace
procedura Registrovat;
začít
RegisterComponents ('MyComponents', [TMyBtn]);
konec;
konec.
Zároveň byla vytvořena nejen nová třída TMyBtn na základě standardní třídy tlačítka TButton, ale je popsán také postup registrace nové komponenty do palety komponent.
Krok 3
V soukromé směrnici popište všechna pole, postupy a funkce, které potřebujete k vytvoření komponenty, a budou mít stav skrytý. Zadejte název pole (s písmenem „F“), jeho typ. Například záznam ve tvaru FDatas: integer popisuje proměnnou FDatas celočíselného typu. V chráněné části uveďte obslužné rutiny událostí, které potřebujete, například z stisknutí klávesnice nebo myši. Navíc při dědění třídy musíte nastavit klíčové slovo přepsání - aby překrývalo nadřazenou obslužnou rutinu standardní události. Například postup zadávání Click; override zajišťuje, že kliknutí na tlačítko bude zachyceno.
Krok 4
Funkce a postupy komponenty dostupné uživateli jsou popsány ve veřejných a publikovaných směrnicích, například pomocí záznamu ve tvaru: funkce TSysInfo. GetUser: řetězec nebo vlastnost MachName: řetězec. V poslední směrnici můžete při použití vlastnosti word určit vlastnosti, které budou k dispozici v inspektoru objektů.
Krok 5
Napište skutečný kód pro fungování komponenty do deklarovaných postupů a funkcí. Ukázkový kód obslužné rutiny:
funkce MachName: řetězec;
var
p: celé číslo;
s: PChar;
začít
c: = stralloc (p);
konec;
konec.
Krok 6
Nainstalujte komponentu do projektu, který potřebujete. V hlavní nabídce Delphi vyberte Komponenta, Instalovat komponentu. V zobrazeném dialogovém okně otevřete jednu z karet: Do existujícího balíčku, pokud chcete nainstalovat komponentu do existujícího balíčku, nebo do nového balíčku - do nového. Klikněte na OK a potvrďte žádost aplikace o přepsání balíčku (je-li to nutné). Poté bude písemná součást připravena k použití.
