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 ?
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. |
