Die offene Programmierumgebung von Delphi basiert auf der Verwendung verschiedener Komponenten. Eine Komponente ist Code, der mithilfe von Eigenschaften, Ereignissen und Prozeduren eine bestimmte Aufgabe ausführt. Beim Erstellen einer Komponente müssen Sie die Werte von Variablen festlegen und den Code von Ereignishandlern implementieren. Um im Programm verwendet zu werden, muss die neue Komponente im Projektpaket enthalten sein.
Es ist notwendig
Delphi-Entwicklungsumgebung
Anleitung
Schritt 1
Wählen Sie den Typ der zu erstellenden Komponente aus. Es kann sich um ein Windows-Element, Grafikelement, Steuerelementobjekt oder eine nicht visuelle Komponente handeln. Außerdem kann Ihr Objekt von jeder vorhandenen Klasse erben. Entscheiden Sie sich für die Funktionen, die Sie der zu implementierenden Komponente zuweisen.
Schritt 2
Starten Sie die Delphi-Entwicklungsumgebung. Öffnen Sie im Hauptmenü der Anwendung die Elemente Komponente, Neue Komponente. Wählen Sie im angezeigten Dialogfeld im Feld Ancestor-Typ die Komponentenklasse aus, die Sie ändern möchten. Wenn Sie keine Vererbung verwenden, geben Sie im Feld Klassenname einfach einen Namen für die neue Komponente ein, der mit dem Buchstaben "T" beginnt. Geben Sie im Feld Palettenseite den Namen der Komponentenregisterkarte nach der Installation ein und klicken Sie dann auf die Schaltfläche Einheit erstellen. Die Entwicklungsumgebung generiert automatisch eine Vorlage für die neue Komponente. Ein Beispiel für den generierten Pascal-Code:
Einheit MyBtn;
Schnittstelle
Verwendet
Windows, SysUtils, Messages, Classes, Controls, Graphics, Forms, StdCtrls, Dialogs;
Art
TMyBtn = Klasse (TButton)
Privatgelände
geschützt
Öffentlichkeit
veröffentlicht
Ende;
Verfahren Register;
Implementierung
Verfahren Register;
Start
RegisterComponents ('MyComponents', [TMyBtn]);
Ende;
Ende.
Gleichzeitig wurde nicht nur eine neue Klasse TMyBtn auf Basis der Standardklasse des TButton-Buttons gebildet, sondern auch die Vorgehensweise zum Registrieren einer neuen Komponente in der Komponentenpalette beschrieben.
Schritt 3
Beschreiben Sie in der privaten Direktive alle Felder, Prozeduren und Funktionen, die Sie zum Erstellen der Komponente benötigen, und sie haben den Status ausgeblendet. Geben Sie den Feldnamen (mit dem Buchstaben "F") und seinen Typ an. Ein Datensatz der Form FDatas: integer beschreibt beispielsweise eine Variable FDatas vom Typ Integer. Listen Sie im geschützten Abschnitt die Ereignishandler auf, die Sie beispielsweise für Tastatur- oder Maustastendrücke benötigen. Darüber hinaus müssen Sie beim Vererben einer Klasse das Schlüsselwort override setzen - um den übergeordneten Handler des Standardereignisses zu überlappen. Zum Beispiel das Eingabeverfahren Click; override sorgt dafür, dass der Mausklick auf die Schaltfläche abgefangen wird.
Schritt 4
Die dem Benutzer zur Verfügung stehenden Funktionen und Prozeduren der Komponente werden in den öffentlichen und veröffentlichten Direktiven beschrieben, beispielsweise durch einen Datensatz der Form: Funktion TSysInfo. GetUser: string oder Property MachName: string. In der letzten Direktive können Sie bei Verwendung des Wortes Eigenschaft Eigenschaften angeben, die im Objektinspektor verfügbar sind.
Schritt 5
Schreiben Sie den eigentlichen Code für das Funktionieren der Komponente in die deklarierten Prozeduren und Funktionen. Beispiel-Handler-Code:
Funktion MachName: Zeichenfolge;
var
p: ganze Zahl;
mit: PChar;
Start
c: = Stralloc (p);
Ende;
Ende.
Schritt 6
Installieren Sie die Komponente in das gewünschte Projekt. Wählen Sie im Delphi-Hauptmenü Komponente, Komponente installieren. Öffnen Sie im angezeigten Dialogfeld eine der Registerkarten: In vorhandenes Paket, wenn Sie die Komponente in ein vorhandenes Paket installieren möchten, oder In neues Paket - in ein neues. Klicken Sie auf OK und bestätigen Sie die Aufforderung der Anwendung, das Paket zu überschreiben (falls erforderlich). Danach ist die geschriebene Komponente einsatzbereit.
