1.File - new componet
2.选择要继承的控件
3.填写自定义控件的名称和控件在控件面板上的位置。
4.编写自定义控件代码,定义了PFaddress 属性。
unit mybutton; interface uses Windows, Messages, System.SysUtils, System.Classes, Vcl.Controls, Vcl.StdCtrls; type TMyButton = class(TButton) private procedure SetFaddress(const<