Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   NotifyEvent: (E2009) Liste der Parameter unterschiedlich (https://www.delphipraxis.net/167996-notifyevent-e2009-liste-der-parameter-unterschiedlich.html)

Jazzman_Marburg 29. Apr 2012 18:49

NotifyEvent: (E2009) Liste der Parameter unterschiedlich
 
Hallo Gemeinde,
ich stehe mal wieder auf dem Schlauch: Ich möchte in meine Statistik-Klasse ein TNotifyEvent einbauen, welches gefeuert werden soll, wenn ein neuer Statistikdatensatz zur Verfügung steht.
Delphi-Quellcode:
type TmyClass = class

  private
    ...
    FOnNewStatNotify  : TNotifyEvent;

  public
    ...
    property NewStatNotify     : TNotifyEvent read FOnNewStatNotify write FOnNewStatNotify;

procedure TmyClass.Stop;
begin

  If FBedingung1 = FKriterium then
    if assigned( FOnNewStatNotify ) then
      FOnNewStatNotify( Self );

end;
Im Create der MainForm steht dann:

MeinObjekt.NewStatNotify := Update;

Und genau in dieser Zeile gibt es beim Compilieren ein Problem:
E2009 Inkompatible Typen 'Liste der Parameter ist unterschiedlich'.

Das verstehe ich nicht: Wieso "Parameter" -- keine der Methoden/Prozeduren hat oder benötigt einen Parameter.
Update ist eine einfache Prozedur, ohne Parameter.

Jemand eine Idee, was ich da falsch mache?

Vielen Dank
Gruß
Jazzman

daywalker9 29. Apr 2012 18:57

AW: NotifyEvent: (E2009) Liste der Parameter unterschiedlich
 
Wie sieht denn dein "Update" aus, welches Du deinem MeinObjekt.NewStatNotify zuweisen willst?

Das TNotifyEvent sieht ja wie folgt aus:

Delphi-Quellcode:
TNotifyEvent = procedure(Sender:TObject) : of object;
Daher müsste deine "Update" Procedure wie folgt aussehen:

Delphi-Quellcode:
TFOrm1 = class(TForm)
private
   procedure Update(Sender:Tobject);
end:

Jazzman_Marburg 29. Apr 2012 19:15

AW: NotifyEvent: (E2009) Liste der Parameter unterschiedlich
 
:stupid: Huuuah!

Zitat:

Zitat von daywalker9 (Beitrag 1164181)
Wie sieht denn dein "Update" aus, welches Du deinem MeinObjekt.NewStatNotify zuweisen willst?
[/DELPHI]

Herrjeh -- peinlich!

Vielen Dank -- ich glaube ich trink jetzt besser mal einen Kaffee.

Danke & Gruß
Jazzman


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz