to shiningplus：
可否请教你们具体的实现方法？谢谢！如何解析？如何实现？RTTI我也用了一些，但只能改变
属性，要改变事件代码现在还不知道如何实现？
请问TMethod类型怎么用？其成员Code,Data具体怎么使用？怎么根据字符串代码比如
"
procedure ButtonClick(Sender: TObject);
begin
showmessage('Success!');
end;
"
赋值给TMethod类型的变量？使利用TMethod变量和SetMethodProp(Object,PropInfo,Method)函数
给控件的事件在运行期修改执行代码？
