Delphi 通过字符串查找指定控件

RAD Studio 10.2.3 测试√

---

procedure TFMain.Button_FindClick(Sender: TObject);
var
  mComponent: TComponent;
begin
  // 这里的string内容给的是控件的Name
  mComponent := FindComponent('Button_1');
  if Assigned(mComponent) and (mComponent is TButton) then
  begin
    TButton(mComponent).Caption := '我被修改了';
  end;

  // GroupBox_RangePoint2 上面控件数量
  ShowMessage(IntToStr(GroupBox_RangePoint2.ControlCount));
end;

---

一点点笔记，以便以后翻阅。