TformResizer 如何使用

Question

我现在想用

Answer 1

//...
TForm1 = class(TForm) 
  FormResizer1: TFormResizer; 
  //...
  procedure FormCreate(Sender: TObject); 
  procedure FormResize(Sender: TObject); 
end;var 
 Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); 
begin 
  FormResizer1.InitializeForm; 
end; procedure TForm1.FormResize(Sender: TObject); 
begin 
 FormResizer1.ResizeAll; 
end; 

Answer 2

我怎么在Delphi组件面板上怎么没有看见 TformResizer 组件啊