我需要保存一些属性并将其加载到数据库中,但我对此感到困惑。我有一个带有几种方法和一个按钮的表单。button.onclick 事件被分配给表单的方法之一。我需要将分配的方法的名称作为字符串(就像对象检查器“form1.proc1”)并将其保存到数据库中。稍后我需要从数据库中获取方法名称并将 button.onclick 分配给相应表单的方法。这可能吗?
Form1 = class(TForm)
...
procedure proc1(Sender: TObject);
procedure proc2(Sender: TObject);
procedure proc3(Sender: TObject);
Button1.OnClick = readMethodNameFromDatabase;
...
saveMethodToDatabase(Button1.OnClick);