Registriert seit: 23. Jan 2008
3.686 Beiträge
Delphi 2007 Enterprise
|
Re: Methodenaufruf umbiegen?
26. Nov 2009, 18:35
Mit ein wenig Umweg:
Delphi-Quellcode:
type
TMyFunc = function: String of object;
TMyClass
private
function FFunc1: String;
function FFunc2: String;
public
GetText: TMyFunc;
GetText2: TMyFunc;
end;
implementation
constructor TMyClass(...)
begin
GetText := FFunc1;
GetText2 := FFunc2;
end;
Und die Zuweisungen kannst du zur Runtime beliebig umherwürfeln. Ich bin mir grad nur unsicher, ob die Syntax für TMyFunc so geht, bislang hatte ich irgendwie immer nur procedure of object genutzt
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
|