Q
q.yuhen
Unregistered / Unconfirmed
GUEST, unregistred user!
NeoForm for Delphi6
--------------------------------------------------------------------------------
电子日记本的 NEO 窗口制作得非常漂亮，网上流传一些制作方法，在研究之后，
发觉使用 TImage 拼凑，以及 Unit 单元中“一大段”代码对于我这个对源码要求
干净整洁的人来说，总觉得不是个味。于是自己动手改进，采用控件加一个TFORM
继承类来实现。
特点：
1.封装完成，目标窗口整洁。便于设计期摆放控件。
2.附加磁性和顶层显示属性。
安装方法：
1.安装 Q_NeoForm.pas 控件。
2.添加搜索路径。
使用方法：
1.在普通窗口中添加 Q_NeoForm 控件。
2.在 use 中添加 NeoForms 。
3.将 TForm1=Class(TForm) 改为 TForm1=Class(TNeoForm)。
当然，您还可以制作一个通用模板重复使用。
属性说明：
Q_NeoForm:
BoldCaption:Boolean 窗口标题是否使用粗字体。
Magnet:Integer 磁性窗口的磁性度。
TopMost:Boolean 是否顶层显示。
系统按钮和边界属性可通过窗口的相关值进行调整。
已知问题：
在使用鼠标拖动边界改变尺寸时闪烁严重，作者试图使用 Double Buffer 改进，
效果不明显。
本软件修改自网上流传的 NeoForm 代码，在此向原作者表示感谢，同时您可免费
使用本软件，如您对其进行改进，请MAIL一份给我，谢谢！
秋雨痕
http://q1xp.onchina.net
q.yuhen@263.net
下载地址： http://q1xp.onchina.net “软件下载”
]