Einzelnen Beitrag anzeigen

Benutzerbild von Phoenix
Phoenix
(Moderator)

Registriert seit: 25. Jun 2002
Ort: Hausach
7.641 Beiträge
 
#8

Re: Label1.Caption := Label1.Beschreibung ?

  Alt 6. Apr 2004, 13:45
War ja auch nur ein Beispiel

Delphi-Quellcode:
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.
Das dürfte eher passen. Mit den published Properties habe ich mich bisher weniger beschäftigt. Vielleicht liest Du dazu auch nochmal in der Onlinehilfe nach.
Sebastian Gingter
Phoenix - 不死鳥, Microsoft MVP, Rettungshundeführer
Über mich: Sebastian Gingter @ Thinktecture Mein Blog: https://gingter.org
  Mit Zitat antworten Zitat