在Lazarus中创建自定义包

Question

我想创建一个自定义标签包，但我真的不知道该怎么做。

我这样做：

文件＆GT;新建 - ＆GT;封装

然后添加 - >新组件

我选择了ancester类型等，最后点击Create New Component。

我收到了以下单位代码。

unit MyLabel1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls;

type
  TMyLabel1 = class(TLabel)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Standard',[TMyLabel1]);
end;

end.

我的问题是：

1. 如何在上面的代码中设置颜色和名称等字体样式？

当我从标准托盘中选择自定义标签到表格时，我想要设置这些属性。

感谢您的帮助！

谢谢！

Answer 1

查看wiki中的 TEnhancedPanel 示例。