Methoden im constructor

[d3g]

Bist du in der richtigen Sparte?

Ich hab jetzt schon länger kein Object Pascal programmiert, aber ich würde es so machen:

Delphi-Quellcode:

type
  TGegenstand = class(TImage)
  private
    FAnzeigeText: TNotifyEvent;
  protected
    property anzeigeText: TNotifyEvent read FAnzeigeText write FAnzeigeText;
  { ... }
end;

constructor TGegenstand.Create(Owner: TWinControl; aktName: String; aktxPos, aktyPos: Integer);
begin
  { ... }
  OnMouseMove := FAnzeigeText;
end;

{ ... }

procedure TGegenstand.anzeigeText(Sender: TObject);
begin
  inherited OnMouseMove;
  (Owner as TForm1).blKuecheText.caption:='Ein Glas mit schwebenden Augen';
end;

Der Zugriff auf das Formulat ist aber in meinen Augen alles andere als Objwektorientiert und ziemlich ekelig -- ich würde dir raten, es anders zu machen. Übrigens solltest du dir überlegen, welche Eigenschaften du von TImage schon erbst (Name zum Beispiel) und in der Delphi-Hilfe unter "property" nachlesen.