OnClick-Prozedurname in String umwandeln

[faux]

Zitat von jbg:

Das funktioniert aber nur, wenn die Methode published ist, also auch mittels des ObjectInspectors zugewiesen werden kann.

Hab sie jetzt mal nach published gesetzt (in der Form). Weiß nicht ob man das darf oder nicht? Jedoch wird mit ein Leerer String zurückgegeben. :S

Delphi-Quellcode:

OnClick := PressActionKey;
{$IF Defined(DEBUG)}
ShowHint := True;
Hint := IntToStr(Tag) + ' - ' + TObject(TMethod(OnClick).Data).MethodName(TMethod(OnClick).Data);
{$IFEND}

Grüße
Faux