主页 / 问题 / 1009145
Accepted
Isaev
Asked:2020-08-01 23:38:01 +0000 UTC2020-08-01 23:38:01 +0000 UTC

是否可以出于我的目的在 Delphi IDE 中使用此字段？

  • 772

在此处输入图像描述

对象检查器有一个看起来像多行字段的字段，在导航时会愚蠢地复制属性的名称，即 这是绝对没用的。更糟糕的是，它甚至无法隐藏！

我想在我的项目中显示该属性的简要说明，但我没有找到有关如何更改那里显示的内容的任何信息。这可能吗？如果可以，怎么做？

delphi

3 个回答

  1. Best Answer

    更新，关于 DescriptionPane：

    IPropertyDescription实现单个方法的接口负责使用 DescriptionPane 面板：function GetDescription: string;

    如果您在创建的属性编辑器中包含此接口的实现，则在选择该属性时其描述将出现在此面板中。

    示例，基于相同的VirtualTreeView：

    TCheckImageKindProperty = class(TEnumProperty,... IPropertyDescription)
  public
    ...
    function GetDescription: string;
  end;

function TCheckImageKindProperty.GetDescription: string;
begin
  Result:='TCheckImageKindProperty.GetDescription';
end;
//====================
RegisterPropertyEditor(TypeInfo(TCheckImageKind), nil, '', TCheckImageKindProperty);

    结果

    关于 DescriptionPane 旁边的面板 - HotCommands：

    负责使用此面板（以及单击组件时的上下文菜单）TComponentEditor，即其方法

    function GetVerb(Index: Integer): string; virtual; function GetVerbCount: Integer; virtual; procedure ExecuteVerb(Index: Integer); virtual;

    通过在您为组件注册的编辑器中覆盖它们，您不仅可以显示信息，还可以执行必要的操作。例如，我取了 VirtualTreeView 并更改了它的编辑器

    type
  TVirtualTreeEditor = class (TDefaultEditor)
  public
    procedure Edit; override;  // этот метод был
    procedure ExecuteVerb(Index: Integer); override; // остальные - добавил
    function GetVerb(Index: Integer): string; override;
    function GetVerbCount: Integer; override;
  end;

procedure TVirtualTreeEditor.ExecuteVerb(Index: Integer);
begin
  inherited;
  ShowMessage('Verb '+IntToStr(Index));
end;

function TVirtualTreeEditor.GetVerb(Index: Integer): string;
begin
  if Index = 0 then
    Result:='VT action';
end;

function TVirtualTreeEditor.GetVerbCount: Integer;
begin
  Result:=1;
end;

    并重建了组件的设计包。

    在对象检查器中

    当你点击它

    上下文菜单

    • 7

  2. 这不是一个字段，而是一个面板 -Status Bar显示系统信息。在这种情况下，属性信息。

    不知道早期版本有没有这样的机会，但是在以后的版本中你可以禁用这个面板，为此你需要：

    • 右键单击Status Bar（面板）或窗口Object Inspecto'а
    • 选择一个项目Properties（结果，设置窗口将打开Status Bar'a）
    • 取消选中该框Show status bar'a并单击按钮Save
    • 0

  3. “左” - 否（它通常是一个数字，并且该字段被积极用于其预期目的 - 它表示相对于父级的偏移量）。对于简要说明，您可以使用 Hint。但是，最终用户可能会看到此字段！还有一个整数属性 Tag，可以自行决定使用。

    组件属性概述：http: //www.delphi.int.ru/articles/106/ - 也许这里有一些对你有用的东西。

    • -2

相关问题