delphi – 按名称设置属性值

在Delphi类中,我有一些属性,我想通过名称访问它们来设置它们.
现在我使用例如Settings.AllowSysop：= True;

我想做一些像Settings(‘AllowSysop’)的东西.值：=真;

这样做的原因是,在设置我的用户可以访问的内容时,从许可文件中读取这些文件,其中从文件中读取的行(类似于INI但加密)可能看起来像

AllowSysop = True

我知道这是一些必须要制作的RTTI外观代码,但我无法弄明白.

如果可能的话,我认为这对我来说会更容易一些.

希望解释是有道理的

解决方法

implementation
uses TypInfo;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
   if IsPublishedProp (Button1,'Visible') then
    begin
      SetPropValue (Button1,'Visible',false);
    end;

end;

原文地址：https://www.jb51.cc/delphi/101937.html