De open programmeeromgeving van Delphi is gebaseerd op het gebruik van verschillende componenten. Een component is code die een specifieke taak uitvoert met behulp van eigenschappen, gebeurtenissen en procedures. Bij het maken van een component moet u de waarden van variabelen instellen en de code van gebeurtenishandlers implementeren. Om in het programma te kunnen worden gebruikt, moet de nieuwe component in het projectpakket worden opgenomen.
Het is nodig
Delphi ontwikkelomgeving
instructies:
Stap 1
Selecteer het type component dat u wilt maken. Het kan een Windows-item, grafisch item, besturingsobject of niet-visueel onderdeel zijn. Uw object kan ook van elke bestaande klasse erven. Bepaal de functies die u de te implementeren component toewijst.
Stap 2
Start de Delphi ontwikkelomgeving. Open in het hoofdmenu van de toepassing de onderdelen Component, Nieuwe component. Selecteer in het dialoogvenster dat verschijnt in het veld Vooroudertype de componentklasse die u wilt wijzigen. Als u geen gebruikmaakt van overerving, voert u in het veld Klassenaam eenvoudig een naam in voor de nieuwe component die begint met de letter "T". Schrijf in het veld Paletpagina de naam van het onderdeeltabblad na installatie en klik vervolgens op de knop Eenheid maken. De ontwikkelomgeving genereert automatisch een sjabloon voor het nieuwe onderdeel. Een voorbeeld van de gegenereerde Pascal-code:
eenheid MijnBtn;
koppel
toepassingen
Windows, SysUtils, Berichten, Klassen, Besturingselementen, Afbeeldingen, Formulieren, StdCtrls, Dialogen;
type
TMyBtn = klasse (TButton)
privaat
beschermd
openbaar
gepubliceerd
einde;
procedure Inschrijven;
implementatie
procedure Inschrijven;
beginnen
RegisterComponents ('Mijn Componenten', [TMyBtn]);
einde;
einde.
Tegelijkertijd werd niet alleen een nieuwe klasse TMyBtn gevormd op basis van de standaardklasse van de TButton-knop, maar wordt ook de procedure beschreven voor het registreren van een nieuwe component in het componentenpalet.
Stap 3
Beschrijf in de privérichtlijn alle velden, procedures en functies die u nodig hebt om het onderdeel te maken, en ze zullen de status verborgen hebben. Specificeer de veldnaam (met de letter "F"), het type. Een record met de vorm FDatas: integer beschrijft bijvoorbeeld een variabele FDatas van het type integer. Geef in het beveiligde gedeelte een lijst van de gebeurtenishandlers die u nodig hebt, bijvoorbeeld van toetsenbord- of muistoetsaanslagen. Bovendien moet u bij het erven van een klasse het override-sleutelwoord instellen - om de bovenliggende handler van de standaardgebeurtenis te overlappen. Bijvoorbeeld de invoerprocedure Klik; override zorgt ervoor dat de muisklik op de knop wordt onderschept.
Stap 4
De functies en procedures van de component die beschikbaar is voor de gebruiker worden beschreven in de openbare en gepubliceerde richtlijnen, bijvoorbeeld met behulp van een record van de vorm: functie TSysInfo. GetUser: string of eigenschap MachName: string. In de laatste richtlijn kunt u, wanneer u het woord eigenschap gebruikt, eigenschappen specificeren die beschikbaar zullen zijn in de objectcontrole.
Stap 5
Schrijf de eigenlijke code voor het functioneren van het onderdeel in de gedeclareerde procedures en functies. Voorbeeld handlercode:
functie MachName: string;
var
p: geheel getal;
met: Pchar;
beginnen
c: = stralloc (p);
einde;
einde.
Stap 6
Installeer het onderdeel in het project dat u nodig hebt. Selecteer in het Delphi-hoofdmenu Component, Component installeren. In het dialoogvenster dat verschijnt, opent u een van de tabbladen: In bestaand pakket, als u het onderdeel in een bestaand pakket wilt installeren, of In nieuw pakket - in een nieuw pakket. Klik op OK en bevestig het verzoek van de toepassing om het pakket te overschrijven (indien nodig). Daarna is het geschreven onderdeel klaar voor gebruik.
