Ist Referenz auf class function möglich?

[TurboMagic]

Hallo,

ich hab' schon danach gesucht ob sowas wie das folgende möglich ist,
aber noch nichts dazu gefunden:

Delphi-Quellcode:

type
  TTest = class function : string of Object;

Also nicht eine Methoden Referenz oder eine auf eine klassische Function,
sondern auf eine CLass Function.

Und in Interfaces können class functions auch nicht, richtig?

Grüße
TurboMagic

[Der schöne Günther]

Wenn du mit "TFunc = reference to function" leben kannst:

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}
{$R *.res}

uses System.SysUtils;

type
   TMyObject = class
      class function MyClassFunction(): String; virtual; abstract;
      function MyObjectFunction(): String; virtual; abstract;
   end;

   function myLoseHerumschlabberndeStringFunction(): String;
   begin
      Result := 'Hallo Welt';
   end;

var
   myStringFunc: TFunc<String>;
begin
   myStringFunc := TMyObject.MyClassFunction;
   myStringFunc := TMyObject.Create().MyObjectFunction;
   myStringFunc := myLoseHerumschlabberndeStringFunction;
end.

[TurboMagic]

Hallo,

nach dem mein darauf umgestellter Quellcode compiliert sollte ich wohl damit leben können ;-)
Danke!

Grüße
TurboMagic

[himitsu]

Delphi-Quellcode:

function : string of object

nimmt sowohl eine Methode (function), als auch eine KlassenMethde (class function) auf.
Hier unterscheidet sich am Ende nur, was im SELF drin steckt ... ein Zeiger auf die Klasse oder auf eine Objekt-Instanz ... ansonsten sind die Zeiger kompatibel.

Eine

Delphi-Quellcode:

class function xyz: string; static;

passt nur in einen Prozedurzeiger

Delphi-Quellcode:

function: string;  // ohne of object

.