/TypeScript/Delphi call function from its name

Delphi call function from its name

interface

type
  TNodeFunction = function(AInput: String): String;

implementation

function Func1(AInput: String): String;
begin
   result := AInput;
end;

function Func2(AInput: String): String;
begin
   result := 'Fooled You';
end;

function Func3(AInput: String): String;
begin
   result := UpperCase(AInput);
end;

procedure Demonstration;
var
  SomeFunc, SomeOtherFunc: TNodeFunction;
begin

     SomeOtherFunc = Func3;

     SomeFunc := Func1;
     SomeFunc('Hello');   // returns 'Hello'
     SomeFunc := Func2;
     SomeFunc('Hello');   // returns 'Fooled You'

     SomeOtherFunc('lower case'); // returns 'LOWER CASE'

end;

Source: stackoverflow.com

Similar codes

0 vote127 views1 answer
Count number of elements in multi-dimensional array python
TypeScript
1 vote126 views1 answer
Typescript add comments to interface prop[
TypeScript
5 votes116 views2 answers
How many states of matter are there
TypeScript
0 vote142 views1 answer
Mat-toolbar' is not a known element
TypeScript
0 vote179 views1 answer
Pcmanfm ubuntu
TypeScript
0 vote133 views1 answer
From __future__ import unicode_literals import youtube_dl ydl_opts = {} with youtube_dl.YoutubeDL(ydl_opts) as ydl: ydl.download(['VideoURL'])
TypeScript
0 vote115 views1 answer
React native vector icon ts file configuaration
TypeScript
0 vote114 views1 answer
React.ComponentProps<T>
TypeScript
0 vote118 views1 answer
Does i5 7th generation processor supports windows 11
TypeScript
0 vote124 views1 answer
Alphabets range using re
TypeScript