/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 vote250 views1 answer
Migrate to typescript
TypeScript
0 vote182 views1 answer
React hooks typescript function return and receive
TypeScript
2 votes199 views2 answers
Material dialog disable close
TypeScript
-1 vote199 views2 answers
What are the components of the environment? Explain it along with the examples class 6
TypeScript
0 vote232 views1 answer
Localhost magento 2 installation redirects to the live server
TypeScript
0 vote193 views1 answer
Number of elements in circular queue
TypeScript
0 vote230 views1 answer
Property 'editor' does not exist on type 'Window & typeof globalThis'.
TypeScript
0 vote181 views1 answer
Ts add property to interface
TypeScript
0 vote215 views1 answer
Can check constraints reference other tables
TypeScript
1 vote189 views1 answer
Angular hide element from component when on certain page
TypeScript