Delphi se oop programmeringsomgewing is gebaseer op die gebruik van verskillende komponente. 'N Komponent is kode wat 'n spesifieke taak uitvoer met behulp van eienskappe, gebeure en prosedures. Wanneer u 'n komponent skep, moet u die waardes van veranderlikes instel en die kode van gebeurtenishanteerders implementeer. Om in die program gebruik te word, moet die nuwe komponent in die projekpakket opgeneem word.
Dit is nodig
Delphi-ontwikkelingsomgewing
Instruksies
Stap 1
Kies die tipe komponent om te skep. Dit kan 'n Windows-item, grafiese item, beheervoorwerp of nie-visuele komponent wees. U voorwerp kan ook van enige bestaande klas erf. Besluit die funksies wat u aan die komponent sal toewys om te implementeer.
Stap 2
Begin die Delphi-ontwikkelingsomgewing. Open die komponent-, nuwe komponentitems in die hooftoepassingsmenu. Kies die komponentklas wat u wil verander in die dialoogkassie wat verskyn, in die veld Ancestor Type. As u nie oorerwing gebruik nie, voer dan eenvoudig 'n naam in vir die nuwe komponent in die veld Klasnaam wat begin met die letter "T". Skryf die naam van die komponent-oortjie na die installasie in die Paletbladsy-veld en klik dan op die Eenheid-knoppie. Die ontwikkelingsomgewing sal outomaties 'n sjabloon vir die nuwe komponent genereer. 'N Voorbeeld van die gegenereerde Pascal-kode:
eenheid MyBtn;
koppelvlak
gebruike
Windows, SysUtils, boodskappe, klasse, kontroles, grafika, vorms, StdCtrls, dialoog;
tipe
TMyBtn = klas (TButton)
privaat
beskerm
publiek
gepubliseer
einde;
prosedure Register;
implementering
prosedure Register;
begin
RegisterComponents ('MyComponents', [TMyBtn]);
einde;
einde.
Terselfdertyd is nie net 'n nuwe klas TMyBtn gevorm op grond van die standaardklas van die TButton-knoppie nie, maar word ook die prosedure vir die registrasie van 'n nuwe komponent in die komponentpalet beskryf.
Stap 3
Beskryf in die privaat richtlijn al die velde, prosedures en funksies wat u benodig om die komponent te skep, en hulle sal die status as verborge hê. Spesifiseer die veldnaam (met die letter "F"), sy soort. Byvoorbeeld, 'n rekord van die vorm FDatas: integer beskryf 'n veranderlike FDatas van 'n heelgetal tipe. In die beskermde afdeling, lys die gebeurtenishanteerders wat u benodig, byvoorbeeld deur op die sleutelbord of die muis te druk. Verder, as u 'n klas oorerf, moet u die sleutelwoord vervang, om die ouerhanteerder van die standaardgebeurtenis te oorvleuel. Byvoorbeeld, die inskrywingsprosedure Klik; override verseker dat die muis klik op die knoppie onderskep word.
Stap 4
Die funksies en prosedures van die komponent wat tot die gebruiker se beskikking is, word in die openbare en gepubliseerde riglyne beskryf, byvoorbeeld met behulp van 'n rekord van die vorm: funksie TSysInfo. GetUser: string of eienskap MachName: string. In die laaste riglyn, as u die woord eienskap gebruik, kan u eienskappe spesifiseer wat beskikbaar is in die objekinspekteur.
Stap 5
Skryf die werklike kode vir die werking van die komponent in die verklaarde prosedures en funksies. Voorbeeldhanteerderkode:
funksie MachName: string;
var
p: heelgetal;
met: PChar;
begin
c: = stralloc (p);
einde;
einde.
Stap 6
Installeer die komponent in die projek wat u benodig. Kies komponent, installeer komponent in die Delphi-hoofmenu. In die dialoogvenster wat verskyn, maak een van die oortjies oop: In bestaande pakket, as u die komponent in 'n bestaande pakket wil installeer, of na 'n nuwe pakket - in 'n nuwe pakket. Klik op OK en bevestig die aansoek om die pakket te vervang (indien nodig). Daarna sal die geskrewe komponent gereed wees vir gebruik.
