TFormResizer 我怎么在Delphi中找不到? 谁能告诉我这个控件在哪? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你到這裡下載:http://www.delphifans.com/SoftView/SoftView_350.html 用法://...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; Access violation at address 4DD4186B in module 'msado15.dll'错误,急 Delphi数据库问题 256色位图的颜色存储的问题?? 菜鸟问题~~~ 为什么我的removedir函数不可以上出目录!! 求一Delphi7打包工具 database的创建问题 请问,怎样是mediaplayer播放的时候不要指定是哪个盘,只要指定是哪个目录下就可以拉? 保存字体设置问题! ListView排序出错,帮我看看 关于TCP数据缓冲区的问题 如何设置Form像Windows的任务栏一样停靠在桌面的一侧,而其它窗体最大化并覆盖不了?
http://www.delphifans.com/SoftView/SoftView_350.html
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;