Funktion oder Proz. übergeben

[SebE]

Guten Abend.

Ich hab gesehen, dass man einer Prozedur/Funktion als Parameter eine Prozedur/Funktion übergeben kann:

Delphi-Quellcode:

type
  TFunc= procedure(Parameter: Char): Byte;

function X(Proc: TFunc): Real;

Aber man muss in der Deklaration von TFunc die Parameter angeben,
geht das auch irgendwie ohne,
so dass ich der Funktion X irgendeine Funtion als Parameter übergebe??
Oder muss die Parameterliste immer schon feststehen?

[Hansa]

Schon mal überlegt, wozu es private usw. gibt ? Wozu soll der Prozedur-Parameter denn überhaupt gut sein ?

[Dax]

Nein, das geht nicht. Das ginge gegen die Delphi-Syntax ;)

[SebE]

Tut mir leid, aber ich verstehe deine Frage nicht so richtig.

Der Code ist doch nur ein Beispiel.

Ich würde nur gern wissen, wie man z.B eine Funktion, deren Parameter unbekannt sind, an eine andere Funktion übergibt.

oh, merke grad, dass ich mich verschrieben habe:

Delphi-Quellcode:

type 
  TFunc= function(Parameter: Char): Byte;

Delphi-Quellcode:

function X(Proc: TFunc): Real;

[SebE]

Gibt es da auch keinen Umweg?

Vielleicht mit Pointern, dass ich die Adresse der Funktion übergebe?
Würde das gehen?

[jfheins]

Nur so: Wie willst du diese Funktion dann aufrufen, dass die Funktion auch alle Parameter übergeben bekommt, wenn du diese nicht weist ?

(Vielleicht ginge es mit ASM und einem CALL ...)

[DGL-luke]

du kannst ganz einfach die funktion selbst mit pointern bauen.

Delphi-Quellcode:

type
  TFunc= function(Parameter: Pointer): Byte;

[Dax]

Kurz? Nein.

Lang: Wenn du eine Funktion verwendest, musst du zur Kompilierzeit wissen, welche Parameter du wie übergeben musst. Das geht aber nur, wenn die Signatur der Funktion/Prozedur festgelegt ist. Es geht nicht anders ;) Mit .net ginge es eventuell, aber unter Win32 kommst du bei so einem Vorhaben um TypeInfo und selbstmodifizierenden Code nicht herum.

[SebE]

Na gut :cry: ,

Aber Danke für die Antworten, man lernt doch jeden Tag was Neues :thumb:

[Kroko1999]

Delphi-Quellcode:

type
  TFunc= function (Params: array of const): Byte;

nur hast du dann die Schwierigkeit den Typ alle Parameter in der Funktion auszuwerten