Label1.Caption := Label1.Beschreibung ?

[Neutral General]

gleichen wie oben :

Eigenschaft Beschreibung existiert nicht in der Basisklasse
Feld oder Methodenbezeichner erwartet
Feld oder Methodenbezeichner erwartet

bei dieser Unit :

Code:

unit Anzeige; 

interface 

uses 
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 
  StdCtrls; 

type 
  TAnzeige = class(TLabel) 
  private 
    { Private-Deklarationen } 
  protected 
    { Protected-Deklarationen } 
  public 
    { Public-Deklarationen } 
    property Beschreibung read Caption write Caption; 
    property Breite read Width write Width; 
  published 
    { Published-Deklarationen } 
    property Beschreibung; 
    property Breite; 
  end; 

procedure Register; 

implementation 

procedure Register; 
begin 
  RegisterComponents('Deutsch', [TAnzeige]); 
end; 

end.