Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Komponente installieren


gerd8888 - Do 19.04.12 21:13
Titel: Komponente installieren
Ich wollte mit Delphi 2009 eine Komponente installieren.
Wie macht man das?

Ich habe schon versucht:
1.Datei-Neu-Package dann Projekt-Dem Projekt hinzufügen (die untere Unit) und dann ganz rechts Project group (rechte Maustaste) - installieren.
Ich sehe aber nichts?

Wie macht man das ?


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
unit unit1;

interface
uses windows, messages, sysutils, classes, graphics, controls, forms, dialogs, stdctrls;

type
TEditBlack=class(TEdit)
  public
  constructor create (aowner:TComponent); override;
end;
TLabelBlack=class(TLabel)
  public
  constructor create(aOwner:TComponent); override;
end;

implementation

constructor TEditBlack.Create(aowner: TComponent);
begin
  inherited create(aowner);
  color:=clblack;
  font.Color:=clwhite;
end;

constructor TLabelBlack.Create(aOwner: TComponent);
begin
  inherited create(aowner);
  color:=clblack;
  font.Color:=clwhite;
end;

procedure Register;
begin
  Registercomponents('Beispiel',[TEditBlack, TLabelBlack])
end;

end.


jaenicke - Do 19.04.12 21:29

Da fehlt das procedure Register; oberhalb von implementation. ;-)


gerd8888 - Do 19.04.12 21:59

stimmt, jetzt sehe ich die Komponente. Danke für den Hinweis.