HiHo
Ich hab eine Komponente geschrieben die von TImage abgeleitet ist. Allerdings braucht sie noch ein internes onResize-Ereigniss. Ich hab deshalb auch in den Private (soll ja intern sein) folgendes eingefügt:
Delphi-Quellcode:
procedure TVerHorLabelResize(Sender: TObject);
property onResize;
Und mein Createkonstruktor (oder wie nennt man das?) sieht so aus:
Delphi-Quellcode:
constructor TVerHorLabel.Create(AOwner: TComponent);
begin
inherited;
OnResize := VerHorLabelResize(self);
end;
Leider kommt dann beim Debuggen ein
Debuggererror:
[Fehler] VerHorLabel.pas(56): Inkompatible Typen: 'TNotifyEvent' und 'procedure, untyped pointer or untyped parameter'
Wo liegt der Fehler und wie behebe ich ihn?
[edit=sakura] Titel einfach zuuuuuu lang 
Mfg, sakura[/edit]