是否有可能获得组件的方法值(表示名称)?

not*_*cky 1 delphi

我需要得到一个组件(TButton的),也就是在设计时被分配在Object Inspector中可以被看到(如名称Button1ClickButton1.OnClick事件选项卡上的事件).

我现在使用TypInfo单元来获取方法的信息PPropInfo,我得到OnClickTNotifyEvent字符串作为值,但我没有得到Button1Clickas字符串值.

我怎么才能得到它?

Ser*_*yuz 6

string := MethodName(GetMethodProp(Button1, 'OnClick').Code);
Run Code Online (Sandbox Code Playgroud)

请注意,该方法需要"发布".