AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Spring4D: Events

Ein Thema von Der schöne Günther · begonnen am 26. Jan 2018 · letzter Beitrag vom 29. Jan 2018
Antwort Antwort
Der schöne Günther

Registriert seit: 6. Mär 2013
6.159 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Spring4D: Events

  Alt 26. Jan 2018, 20:50
Ich habe da mal eine Frage zu Spring.Event<T>.

An sich ist beim Event sehr wenig öffentlich: Add(T) , Remove(T) , Clear() und die Eigenschaft Enabled . In früheren Spring-Versionen gab es z.B. noch Count .

Ich bin verwirrt weshalb beispielsweise von TEvent<T> das Array Handlers: TArray<TMethodPointer> nicht öffentlich lesbar ist.

Ein konkreter Anwendungsfall: Ich möchte bei einem Event bestimmte Handler temporär entfernen und später wieder hinzufügen. Mit der derzeitigen Implementation geht das nicht.

Mir geht es nicht darum wie man das ändern könnte, sondern ich möchte die Motivation hinter dem Design verstehen. Der Urheber liest ja hier im Forum mit


PS: Was spräche denn nun bspw. gegen so etwas hier:
Code:
diff -r 8b40c231f18a -r 72569be88490 Source/Base/Spring.pas
--- a/Source/Base/Spring.pas   Fri Jan 26 11:23:01 2018 +0100
+++ b/Source/Base/Spring.pas   Fri Jan 26 20:24:57 2018 +0100
@@ -923,6 +923,7 @@
   IEvent<T> = interface(IEvent)
   {$REGION 'Property Accessors'}
     function GetInvoke: T;
+    function GetHandlers: TArray<TMethodPointer>;
   {$ENDREGION}
 
     /// <summary>
@@ -939,6 +940,7 @@
     ///   Invokes all event handlers.
     /// </summary>
     property Invoke: T read GetInvoke;
+    property Handlers: TArray<TMethodPointer> read GetHandlers;
   end;
 
   Event<T> = record
@@ -958,10 +960,12 @@
     procedure Remove(const handler: T);
     procedure RemoveAll(instance: Pointer);
     procedure Clear;
+    function GetHandlers(): TArray<TMethodPointer>; experimental;
 
     property CanInvoke: Boolean read GetCanInvoke;
     property Enabled: Boolean read GetEnabled write SetEnabled;
     property Invoke: T read GetInvoke;
+    property Handlers: TArray<TMethodPointer> read GetHandlers;
     property OnChanged: TNotifyEvent read GetOnChanged write SetOnChanged;
 
     /// <summary>
@@ -9625,6 +9629,12 @@
 {$ENDIF}
 end;
 
+function Event<T>.GetHandlers(): TArray<TMethodPointer>;
+begin
+    EnsureInitialized();
+    Result := TArray.Copy<TMethodPointer>(fInstance.Handlers);
+end;
+
 initialization
   Init;

Geändert von Der schöne Günther (26. Jan 2018 um 20:53 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.016 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#2

AW: Spring4D: Events

  Alt 26. Jan 2018, 21:01
Strikte API, klare Kapselung, kein Rumfuckeln an Interna und vor allem keine "braucht einer von 100" Features.
Daher auch das Entfernen von Count, es interessiert einfach nicht für den Anwendungsfall eines Multicastevents.

Ungeachtet deiner Motivation, das zu brauchen, neige ich zu der Meinung, dass es nicht Aufgabe des Events ist, bestimmte Handler an oder aus zu schalten, sondern einer anderen Komponente (Stichwort SRP).
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight

Geändert von Stevie (26. Jan 2018 um 21:04 Uhr)
  Mit Zitat antworten Zitat
mensch72

Registriert seit: 6. Feb 2008
838 Beiträge
 
#3

AW: Spring4D: Events

  Alt 27. Jan 2018, 23:41
Spring4D ist ein universelles BasisFramework "mit Konzept", so ist es OK hier auch nur das zu implementieren, was "alle brauchen" und deterministisch Test fähig ist.

Bei Multicast-Lösungen streiten sich eh die Leute, ob und wie man sauber bestimmt wann/wo/ob eine Zusatzeventfunktion abgearbeitet wird.
Selbst beim hochgelobten C# kann man nicht bestimmen, ob das Zusatzevent am Anfang oder am Ende der bereits existierenden MultiCastListe eingefügt wird.

Ich habe mir (auf Basis der Arbeit von STOXX) dazu eine eigene TMethodListe mit einem zusätzlichem PrioParameter realisiert.
Getreu dem altbekanntem und beliebtem Standard(Delphi)Konzept "BeforeXXX('+1')","OnXXX('0')","AfterXXX('-1')".
Wenn ich nix angebe läuft alles auf Prio'0' und entspricht dem "Spring4D" bzw. C# Konzept.


Da bleiben nun wieder die konzeptionellen Fragen:
1. Was ist besser, schöner, einfacher,... drei Multicastevents(BeforeXXX/OnXXX/AfterXXX) oder ein universelles Multicastevent mit Prioritätsparameter (wo auch noch mehr möglich)?
(ich habe es mir selbst "einheitlich" realisiert, weil ich ähnliches Problem bei der Standardversion von "AddAyncTask" hatte, da gab es auch keine Option zu bestimmen wo&wie ein neuer Task in die Warteliste eingereiht wird)

2. "Wie" Können/Sollen sich Prioritäten soweit ändern, das dies bis zu den Extremen "noch gelistet aber wird gar nicht mehr aufgerufen" bzw. "wird nun exclusiv ohne alles andere mit geringerer Prio aufgerufen" sinnvoll funktioniert?
(ich habe auch dies "als weil es geht" implementiert, aber immer wenn ich es "schnell mal" einsetze, finde ich später eine bessere und konzeptionell sauberere Lösung... für schnelle Debug/Test-Fälle oder mal fix einen QuickAndDirty-Patch hilft das durchaus... es zerstört jedoch jegliche verlässliche Programmstruktur, weil die reale Programmfunktion ist dann nicht mehr deterministisch und wird so un-dokumentierbar!... 100%: in Spring4D hat sowas definitiv nix zu suchen, schon gar nicht offen ungeschützt herausgeführt).
  Mit Zitat antworten Zitat
Der schöne Günther

Registriert seit: 6. Mär 2013
6.159 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: Spring4D: Events

  Alt 29. Jan 2018, 09:11
Die Reihenfolge zu wissen oder gar zu ändern (Prioritäten und so) war gar nicht der Plan. Ich wollte nur wissen was überhaupt drin steckt.

Bis auf das von außen aufrufbare Invoke() entspricht das Spring4D-Event<T> somit , um bei C# zu bleiben, wahrheitsgemäß dem event in C#. Was ich wohl suchte war eher das Delphi-Gegenstück zum Delegate .
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:19 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