Naja, viel Spaß dann noch
Trotzdem, der Vollständigkeit halber:
Delphi-Quellcode:
...
TYPE
TCustEd = CLASS(TEdit)
PRIVATE
FDBfeldLabel: TLabel;
FWriteLabel: STRING;
PROCEDURE SetWriteLabel(CONST Value: STRING);
{ Private-Deklarationen }
...
PROCEDURE SetWriteLabel(CONST Value: STRING);
sollte in PRIVATE stehen, dann passiert Dir mein Fauxpas von oben nicht mehr.
p.s. Zur Komponentenentwicklung habe ich schon mal was gepostet:
Creating Custom Delphi Components, Part I
Creating Custom Delphi Components, Part II
Creating Custom Delphi Components, Part III
Sind meiner Meinung nach die besten Tips im Netz!