Dynamisch erzeugte Event Handler

[GeorgWa]

Hallo lieber Delphi-Praxis Community,
ich habe eine Klasse die jeweils ein Shape und Ein Timer beinnhaltet.
Diese wird je nach anforderung beliebig oft erzeugt, nun will ich eine OnTimer
Event einfügen was immer eine prozedur auslöst.
Dabei scheiter ich leider aktuell da ich nicht weis wie man einem NotifyEvent eine procedur zuordnet.

Delphi-Quellcode:

 
auto[index].TmrMovement := TTimer.Create(Form1);
  With auto[index].TmrMovement do
  begin
    enabled := true;
    interval := 30;
    name := 'TmrMovement' + IntToSTr(Index);
  end;

mit freundlichen grüßen Georg

[DeddyH]

Du kannst einen beliebigen TNotifyEvent nehmen und zuweisen.

Delphi-Quellcode:

type
  TDeineKlasse = class(TIrgendwas)
  private
    procedure TimerProc(Sender: TObject);
  ...
  end;

...

DeinTimer.OnTimer := TimerProc;

[GeorgWa]

Das war auch meine erste Idee wobei dann wenn man die
Prozedur Namen mit Klammer schreibt folgender fehler kommt:

Delphi-Quellcode:

[Fehler] Unit1.pas(76): Inkompatible Typen: 'TNotifyEvent' und 'procedure, untyped pointer or untyped parameter'

Und wenn man den Prozedur Namen mit Klammern am Ende schreibt:

Delphi-Quellcode:

[Fehler] Unit1.pas(76): Inkompatible Typen: Liste der Parameter ist unterschiedlich

[Furtbichler]

Wieso schreibst Du das mit Klammer?

[Der schöne Günther]

Kann es sein, dass du eine klassenlose Prozedur dem Event zuweisen willst? Das geht nämlich nicht. Die Definition von

Delphi-Quellcode:

TNotifyEvent

ist

Delphi-Quellcode:

procedure(Sender: TObject) of object;

. Die Methode muss also einen Parameter vom Typ TObject entgegennehmen und eine Instanzmethode einer Klasse sein.

Also nicht

Delphi-Quellcode:

procedure meineTimerProzedur(Sender:TObject)

sondern z.B.

Delphi-Quellcode:

procedure TMeinFormular.meineTimerProzedur(Sender:TObject)

Den Grund dafür habe ich nie ganz verstanden. Wäre das nicht so, könnte man auch anonyme Prozeduren als Eventhandler setzen. Vielleicht ist das aber auch besser so. Würde man das brutal ausnutzen wird das sicher unübersichtlich...

[Furtbichler]

Zitat:

Zitat von Der schöne Günther (Beitrag 1229976)

Den Grund dafür habe ich nie ganz verstanden.

Eine

Delphi-Quellcode:

TMethod

ist einfach etwas anderes als eine

Delphi-Quellcode:

TProcedure

. Und wir wollen ja nicht mehr prozedural programmieren.

Ich fasse noch einmal zusammen:

Zitat:

Zitat von DeddyH (Beitrag 1229894)

Delphi-Quellcode:

...
DeinTimer.OnTimer := TimerProc;

Zitat:

Zitat von GeorgWa (Beitrag 1229953)

...wobei dann wenn man die Prozedur Namen mit Klammer schreibt folgender fehler kommt:...

Zitat:

Zitat von Furtbichler (Beitrag 1229954)

Wieso schreibst Du das mit Klammer?

Würde mal denken, es liegt an den Klammern. Seufz.

[GeorgWa]

Ok danke :)
so wie ihr es erklärt habt habe ich es jetzt endlich richtig verstanden ;)