Hallo raptascha,
die Delphi-Hilfe sagt, dass du eine Prozedur vom Typ TNotifyEvent brauchst. Solche Prozeduren haben immer nur einen sichtbaren Parameter (Sender vom Typ TObject). Du musst also direkt nach der Klassendeklaration die Prozedur anzeigeText deklarieren, die einem TNotifyEvent entsprechen muss:
Delphi-Quellcode:
type TGegenstand=class(TImage)
procedure anzeigeText(Sender: TObject);
private
...
public
constructor create(Owner: TWinControl; aktName: String; aktxPos,aktyPos:Integer);
end;
...
constructor TGegenstand.Create;
begin
...
OnClick := anzeigeText;
end:
Im Übrigen brauchst du in anzeigeText kein inherited anzeigeText aufrufen, da es keine übegeordnete Methode anzeigeText gibt.
Und der Befehl
Owner.lblKuecheText.caption:='Ein Glas mit schwebenden Augen';
wird dir wahrscheinlich auch nichts bringen, da du Owner ja nur als Parameter im Constructor hattest.
Ich hoffe, das hat dir ein bisschen geholfen!
MfG
fenni