delphi_Easysize_delphi7

所属分类:界面编程
开发工具:Delphi
文件大小:17KB
下载次数:26
上传日期:2017-02-21 10:13:15
上 传 者1843692
说明:  程序界面自动调整大小的软件,可用于最大化或分辨率自适应。
(The program interface automatically resizes the software that can be used to maximize or resolution adaptive.)

文件列表:
delphi_Easysize_delphi7\DEMO\Project1.cfg (434, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Project1.dof (2571, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Project1.dpr (182, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Project1.res (876, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Unit1.dcu (3988, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Unit1.ddp (51, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Unit1.dfm (1156, 2003-12-21)
delphi_Easysize_delphi7\DEMO\Unit1.pas (689, 2003-12-21)
delphi_Easysize_delphi7\Easysize.d16 (1662, 1999-05-25)
delphi_Easysize_delphi7\Easysize.d32 (480, 1999-05-11)
delphi_Easysize_delphi7\Easysize.dcu (8366, 2003-12-21)
delphi_Easysize_delphi7\Easysize.pas (18438, 2000-01-06)
delphi_Easysize_delphi7\mydelphi.8u8.com.txt (656, 2003-12-04)
delphi_Easysize_delphi7\DEMO (0, 2003-12-21)
delphi_Easysize_delphi7 (0, 2017-02-21)

VCL component TFormResizer 2.0 ------------------------------ I. Credits, copyright, and warranty disclaimer II. Usage instructions III. Installation IV. File list I. CREDITS, COPYRIGHT, AND WARRANTY DISCLAIMER Versions 1.0 and 1.1 written by David A. Price, dprice@erols.com Version 2.0 adds font-resizing enhancements contributed by Wolfgang Kleinrath, office@kleinrath.at Copyright 1999 by David A. Price http://www.compcreate.com This file may be redistributed freely if not altered Suggestions are welcome Offered "AS IS" -- no warranties II. USAGE INSTRUCTIONS The TFormResizer component resizes all of the components on a form when the form size changes. It has been tested with Delphi 1.0, 2.0, and 3, and should be compatible with Delphi 4. To use TFormResizer, do the following three steps: 1. Add a TFormResizer component to the form. 2. In the form's OnCreate handler, add a call to the component's InitializeForm method, e.g., FormResizer1.InitializeForm; 3. In the form's OnResize handler, add a call to the component's ResizeAll method, e.g., FormResizer1.ResizeAll; ... and that's it. But there's more you can do if you want more functionality: * If you want the TFormResizer to scale the font size of components as the form grows or shrinks, set the ResizeFonts property to True. TFormResizer works with all fonts, but you will get the best results with TrueType fonts (such as Arial). * If you also want the TFormResizer to enforce the form's initial size as its minimum size, set the EnforceMinSize property to True. (The user will still be able to minimize the form into an icon using the Windows minimize button.) * If you want to add custom resizing behavior for a particular component, add a handler for the TFormResizer's OnPostResize event, which is fired after a component is resized. Its arguments are Sender: TObject -- as usual Comp : TControl -- the component that has just been resized HeightRatio : Double -- ratio of the form's initial height to its current height. E.g., if the form's height has doubled since the call to InitializeForm, then HeightRatio is 2.0. WidthRatio : Double -- as above for form's width Two quick samples of code for OnPostResize handlers: if Comp = Button1 then if WidthRatio < 0.8 then Button1.Caption := ... if Comp is TMyClass then TMyClass(Comp).SomeProperty := ... III. INSTALLATION Install Easysize.pas as you normally would install a component in your version of Delphi. The component will appear on the "Additional" tab of your component palette. When installing to Delphi 1.0, you should have resource file Easysize.d16 present in the same directory as Easysize.pas (for the component's palette bitmap). When installing for other versions of Delphi, you should have resource file Easysize.d32 present in the same directory as Easysize.pas. IV. FILE LIST Easysize.pas -- component source file Easysize.d16 -- 16-bit resource file Easysize.d32 -- 32-bit resource file Readme.txt -- this text file

近期下载者

相关文件


收藏者