Die datensensitive Komponente erstellen und registrieren
Nach oben zu Ein Katalogelement erstellen
Alle Komponenten werden nach dem gleichen Prinzip erstellt: Sie erzeugen eine Unit, leiten eine Komponentenklasse ab, registrieren sie, compilieren die Unit und installieren die Komponente in der Tool-Palette. Dieser Vorgang wird unter Eine neue Komponente erzeugen beschrieben.
Für das vorliegende Beispiel führen Sie die allgemeine Prozedur zum Erstellen einer Komponente aus, wobei folgende Schwerpunkte gesetzt werden:
- Benennen Sie die Unit der Komponente DBCal.
- Leiten Sie eine neue Komponente namens TDBCalendar ab, die eine untergeordnete Klasse der Komponente TSampleCalendar ist. Im Abschnitt Gitter anpassen wird die Erstellung der Komponente TSampleCalendar erläutert.
- Registrieren Sie TDBCalendar in der Kategorie Beispiele der Tool-Palette.
Die von TCustomGrid in einer VCL-Anwendung abgeleitete Unit sollte folgendermaßen aussehen:
unit CalSamp;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Grids;
type
TSampleCalendar = class(TCustomGrid)
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('Samples', [TSampleCalendar]);
end;
end.
Wenn Sie die Kalenderkomponente jetzt installieren, wird sie auf der Seite Beispiele angezeigt. Momentan sind nur grundlegende Eigenschaften verfügbar. Der nächste Schritt besteht darin, den Benutzern des Kalenders speziellere Eigenschaften zur Verfügung zu stellen.
Hinweis: Obwohl die soeben compilierte Kalenderkomponente bereits installiert werden kann, sollten Sie noch nicht versuchen, sie in einem Formular zu platzieren. Zur Komponente TCustomGrid gehört nämlich die abstrakte Methode DrawCell, die redeklariert werden muss, bevor Instanzen der Klasse erzeugt werden. Das Überschreiben der Methode DrawCell wird unter Die Zellen füllen beschrieben.