Property auf untergeordeter Klasse anstoßen (Pascal)

OP #1975593
Hi!

bin gerade via Lazarus an erstellen einer Klasse, welche eine Urklasse 
Besitzt und deren Property aus den klassen, welche auf diese zugreifen 
anstoßen soll.

Klartext:

 TBauelemente = class(TGraphicControl)
  private
    { Private declarations }
.
  strict protected
    BEAllg: TBEAllg;
  protected
    { Protected declarations }
  public
    { Public declarations }
.    Index: String;
    Procedure SetDatensatz(_Index: Byte; Value: String);
 published
    { Published declarations }
    property Datensatz[Value:Byte]: String read GetDatensatz write 
SetDatensatz; Override;
    Constructor Create(AOwner: TComponent); Override;
  end; <<< Dies ist die Urklasse.

Über die erbende Klasse soll der "Datensatz" angestoßen werden und sich 
selbstständig die Daten einladen.

Wenn jemand einen Tip hat, bin i sehr dankbar.

Antwort schreiben

Eine eigene Frage? Dieser Thread ist über 15 Jahre alt. Stell sie in einem eigenen Thread – dort lesen mehr Leute mit, und sie wird öfter und schneller beantwortet.

Neuen Thread starten

Eine Lösung, Ergänzung oder Rückmeldung zu diesem Thread? Dann antworte hier.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.