Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!


How to get MethodName

Lemma78Lemma78 Member Posts: 1
I am trying to get MethodName, but I get always empty string ...

TParseSymbolProcedure = procedure(symbol: TSymbol) of object;
TParser = class
FParse: TParseSymbolProcedure;

procedure Parse_Set(symbol: TSymbol);
procedure Parse_SetVar(symbol: TSymbol);
procedure Parse_SetVarExpr(symbol: TSymbol);

FParse := Parse_Set;
now I need code like MethodName(FParse);
and the result would be 'ParseSet'
... is it possible? do I need to change TParser a log to make it work?

thx for answer
Sign In or Register to comment.