Frage zu Anonymen Prozeduren (TProc) und verwendung als Bauskasten

[Uwe Raabe]

Zitat von fisipjm:

Da sich diese Anforderungen während der Benutzung der Anwendung ändern können, möchte ich das gerne dynamisch zusammen setzen können. Müsste ja mit RTTI gehen, dass ich aus den Strings in der Datenbank die Prozeduren raus fische und die dann entsprechend dran hänge.

Könntest du hierfür noch ein konkretes Beispiel geben?
Also, was steht in der Datenbank und was soll damit passieren?

[fisipjm]

Zitat von Uwe Raabe:

Zitat von fisipjm:

Da sich diese Anforderungen während der Benutzung der Anwendung ändern können, möchte ich das gerne dynamisch zusammen setzen können. Müsste ja mit RTTI gehen, dass ich aus den Strings in der Datenbank die Prozeduren rausfische und die dann entsprechend dran hänge.

Könntest du hierfür noch ein konkretes Beispiel geben?
Also, was steht in der Datenbank und was soll damit passieren?

Moin,

Noch steht in der Datenbank
1. Zeile - Task 1
2. Zeile - Task 2
3. Zeile - Task 3
usw.*...

Ich hätte es zukünftig gerne so:
Tabelle 1 (Sichtbar für Otto normal Bediener)
1. Zeile - Bundle 1

Andere Tabelle (Zugriff von Benutzern mit Ahnung vom Ablauf)
BundleName = Bubndle 1
PreTask = Task 1;Task x ...
MainTask = Task 2
PostTask = Task 3;Task x ...

Andere Tabelle (irgendwann mal halbautomatisch gefüllt) zur Verfügung stehende Tasks
1. Zeile - Task 1
2. Zeile - Task 2
3. Zeile - Task 3


Diese Struktur hatte ich gedacht mit den Anonymen Prozeduren abbilden zu können. Also im Prinzip das Bundle

[Uwe Raabe]

Und "Task x" steht dann für eine der Prozeduren a, b, c,...?

[fisipjm]

Zitat von Uwe Raabe:

Und "Task x" steht dann für eine der Prozeduren a, b, c,...?

Genau, alle Prozeduren, die angehängt werden sollen, existieren bereits im Code. Sollten aber in beliebiger Anzahl dran gehängt werden können.
Also Pro bzw. Post Prozedur kann auch leer sein oder eben 10 Prozeduren enthalten, deshalb im Code das

Code:

Array of TProc

Ich habe absolut keinen Peil, ob das funktionieren kann

[himitsu]

Wenn der TaskManager dafür nichts bietet, dann machen es die Task eben selber


TaskA kann auch TaskB/SeineProc mitgegeben werden, welchen Diesen an seinem Ende startet/übergibt.

oder es gibt global Events, wo TaskA am Ende mit SetEvent reagiert und TaskB hat das WaitFor (für den Fall, dass er zu früh kommt).
bzw. es muß nicht global sein, aber Beide müssen ihr Event kennen und B gibt es dann am Ende frei.

oder ...

[Uwe Raabe]

Wenn ich das jetzt richtig verstehe, dann haben wir pro Bundle drei Strings PreTask, MainTask und PostTask mit Inhalten wie z.B. 'a,b', 'c' und 'd,e' und das soll zu folgender Aufrufsequenz führen:

Delphi-Quellcode:

begin
  { pre }
  a;
  b;

  { main }
  c;
  
  { post }
  d;
  e;
end;

Ich würde einfach ein TDictionary<string, TProc> verwenden und dort die einzelnen Methoden mit ihren Namen registrieren. Um dann die Tasks eines Bundles auszuführen zerlegt man die PreTask, MainTask und PostTask Strings in seine Einzelteile, holt sich die entsprechende Methode aus dem Dictionary und führt die aus. Das ist leicht zu verstehen, noch leichter zu warten und ausreichend performant.