Delphi ：如何用TEEdit文本获取组件的确切名称[重复]

xurqigkl 于 2023-11-18 发布在其他

关注(0)|答案(1)|浏览(119)

此问题在此处已有答案：

How can I refer to a control whose name is determined at runtime?（5个答案）
昨天就关门了。
抱歉，可能我的问题表达不清楚。我的表单中有很多TPanel。我需要用TEdit.text获取TPanel的确切名称。例如，TEdit.text是26，而不是使用if panel26.color=clred then ...，我希望使用if (Panel+edit1.text).color=clred then ...

delphi

来源：https://stackoverflow.com/questions/77492081/delphi-how-to-get-exact-name-of-component-with-tedit-text

1条答案

按热度按时间

xzv2uavs1#

您可以像这样使用 FindComponent：

var
  TmpPanel: TPanel;
begin
  TmpPanel := FindComponent('Panel' + edit1.text) as TPanel;
  if TmpPanel <> nil then      // We found it
    if TmpPanel.color=clred then ...
end;

字符串
如果你想更深入地挖掘我的答案来源：How can I refer to a control whose name is determined at runtime?

赞(0）回复(0）举报 2023-11-18

我来回答

Delphi ：如何用TEEdit文本获取组件的确切名称[重复]

1条答案

相关问题

热门标签

最新问答