Funktionsnamen aus Variablen?

[new32]

Gibt es eine möglichkeit eine Funktion auszuführen, deren Name in einer Variable steht?

z.B.:

Delphi-Quellcode:

var s:string;

procedure h;
begin
 //???
end;

s:=h;

so und nu möchte ich dieses hier anders machen:

Delphi-Quellcode:

if s=h then h;

[Dax]

Ja, die Möglichkeit gibt es. Aber sie wird von Delphi nicht angeboten. Das ganze Ding, das du brauchst, nennt sich Parser, damit könnte es gehen ;)

Falls du das wirklich über Strings machen willst, schlage ich vor, deine Prozeduren als class procedures in eine Klasse zu legen (unter published) und per RTTI anzusprechen.

[Oxmyx]

Nein, es gibt keine triviale Möglichkeit, das zu tun was du erreichen willst. Ich weiß allerdings nicht, was an einer if-Abfrage schlecht sein soll.

[new32]

Zitat:

Zitat von Oxmyx

Ich weiß allerdings nicht, was an einer if-Abfrage schlecht sein soll.

Ich baue nen Interpreter; wenn ich nu für jeden Befehl ne if-Abfrage(oder case...) mache, bin ich 1. ewig damit bescheftigt und 2. wird das ding immer langsamer!


verstehst du mein Problen?

MfG NEW32!

[Speedmaster]

Stichwort: Funktions und Methodenzeiger!

[Pseudemys Nelsoni]

Und wie sollen ihm Methodenzeiger dort helfen? Per string kann er sie damit trotzdem nicht ansprechen bzw aufrufen.

[new32]

versteh ich auch nich.

ich stell mir das so vor(vereinfacht):

Delphi-Quellcode:

runProc('h');

[MrKnogge]

Die procedure-Namen die du in Delphi gibst, gibt es aber später im programm nicht mehr, sie dienen lediglich zum programmieren, folglich wirst du um if / case nicht drumrum kommen.

[negaH]

Es gibt tatsächlich zwei Möglichkeiten die in Delphi integriert sind um das zu erreichen:

1.) über Klassen deren Methoden published wurden. Über Class.FindMethod() kann man solche published Methoden finden und aufrufen. Deren Parameter müssen aber denoch zur Compilertime bekannt und fixiert sein.

2.) über Interfaces, genauer gesagt über IDispatch. Benutzt man solche Interfaces dann gibt es bekanntlich zwei Arten der Bindung solcher Interfaces -> die frühe Bindung ist hardcoded durch den Compiler aber die späte Bindung basiert auf Namen. Vorteil dieser Variante ist es das die Parameter selber ebenfalls dynamisch zu Laufzeit übergeben werden können und denoch Typsicher sind.

In jedem Falle müssten deine Proceduren/Funktionen in Klassen oder Interfaces gekapselt werden, was ich sogar als Vorteil empfinde. Die letztere Art kann zb. auch mit dem MS-Scripting benutzt werden. D.h. man kann zb. in VBA Basci seine Scripte schreiben, in Delphi seine eigenen IDispatch Schnittstellen implementieren und diese dann innerhalb der Scripting Engine aufrufen.

Gruß Hagen

[new32]

Zitat:

Zitat von MrKnogge

Die procedure-Namen die du in Delphi gibst, gibt es aber später im programm nicht mehr, sie dienen lediglich zum programmieren, folglich wirst du um if / case nicht drumrum kommen.

Da is was dran... hätt ich eigentlich selbst drauf kommen können.

@all: TNX!