Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
27. Apr 2015
@Sir Rofu
Danke für deine umfassenden Ausführungen. Ich werde das mal mit den generics probieren, mal schauen wie ich damit klar komme.
@himitsu
das ist ja mal ein fieses Stück Sourcecode xD
S := 'Welt';
B := False;
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
27. Apr 2015
// Wrappen mit Argumenten
LProc := TWrapper.Proc<string, Integer>(
{AProc} DoFoo,
{Arg1} 'Ein String',
{Arg2} 42 );
Danke erstmal für deine ausführliche Antwort.:)
kann ich dabei auch variablen angeben, ansonsten wärs ja ziemlich sinnlos und auch ziemlich viel Code? Die ganzen Proceduredeklarationen für einen weiteren Parameter. Da ich gerne universelle "einmal machen und...
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
27. Apr 2015
Delphi-Quellcode:
function TWrapper.Wrap<T>( AProc : TProc<T>; Arg: T ): TProc;
begin
Result := procedure
begin
AProc( Arg );
end;
end;
und dann einfach
markieren Delphi-Quellcode:
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
24. Apr 2015
@Sir Rufo so ähnlich meinte ich es ja mit dem keyValuePair Dictionary, aber seien wir mal ehrlich, von der Eleganz und Simplizität einer einfachen methodenübergabe sind wir immer noch weit entfernt. :/ Aber scheint wohl keine andere Möglichkeit zu geben.
mfg newbe
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
24. Apr 2015
Das heisst ich komme nicht drumrum mir für jede in den Parameter Abweichende Workermethode eine extra Addpoolwithparams methode zu schreiben bzw ein ensprechenden classhelper zu implementieren? In meinen Augen unnötig und totaler Schwachsinn, wenn nicht irgendeine technische Gegebenheit dies verlangt.
Ich möchte nicht für jede abweichende parameter anzahl und art eine extra Add methode...
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
24. Apr 2015
Ah Danke himitsu, werde ich mal probieren. Dieses konstrukt TProc<T1,T2> is eine generic oder? Habe damit noch nicht gearbeitet, erinnert mit aber an die Tuple Class von C#. Warum darf das nicht in einer Schleife aufgerufen werden? Hab ich auch nicht vor, nurmal zur Info wäre es interessant.
Und wie definiere ich denn in Delphi den Typ von T1 und T2?
mfg newbe
//edit
Also anscheinend...
Forum: Object-Pascal / Delphi-Language
Delphi
by newbe,
24. Apr 2015
Hallo zusammen!
Ich habe hier folgenden Aufruf
TThreadPool.Default.QueueWorkItem(TestPing);
Ich möchte gerne der dem Workerevent, also der Procedure "TestPing" mehrere Parameter mitgeben, habe aber keine Ahnung wie das zu bewerkstelligen ist?
Hat jemand dazu eine passende Idee?
mfg newbe