当前位置: 首页 > 开发语言 > Delphi > Delphi教程分割窗体的实现

Delphi教程分割窗体的实现

时间:2020-11-16 18:17来源:未知 点击:
分享到:
Windows自带的“资源管理器”的界面给人一种简单明了的感觉,并且操作非常方便。其实分割窗体在这里面起到了很大的作用,本实例将演示在Delphi中如何不用一行代码就设计出分割窗体。

在窗体中添加一个TImage组件,设置Name属性为Image1,Align属性为alBottom。然后向窗体上添加一个TSplitter组件,设置Name属性为Splitter1,Align属性和Image1组件的Align属性一样,设置为alBottom,这样,Splitter1组件就会紧贴在Image1组件的上方。最后向窗体上添加一个TPanel组件,设置Name属性为Panel1,Align属性为alClient。
经过以上的设置,整个窗体就会在程序运行的过程中被分割成上下两个部分,并且可以实时地通过拖动鼠标来改变两个部分的大小。

下面需要做的是把前面Panel1组件分割成为左右两个部分。
首先向Panel1组件上添加一个TImage组件,设置Name属性为Image2,Align属性为alLeft。然后向窗体上添加一个TSplitter组件,设置Name属性为Splitter2,Align属性为alLeft。这样,Splitter2组件就会紧贴在Image2组件的右边。最后向窗体上添加一个TImage组件,设置Name属性为Image3,Align属性为alClient。
经过以上的设置,Panel1组件就会在程序运行的过程中被分割成左右两个部分,并且可以通过拖动鼠标来改变两个部分的大小。
在这一步中需要注意的是,Image2、Image3和Splitter2组件是添加到Panel1组件上,而不是窗体上。首先选中Panel1组件,然后在组件工具栏中双击要添加的组件,这样就会把组件添加到Panel1组件上。
设计完成的窗体如图1-9所示。

图1-9  设计完成的窗体

保存文件,然后按F9键运行程序,程序运行的初始画面如图1-10所示。

图1-10  程序运行的初始画面
在程序运行的过程中,可以通过拖动鼠标来改变窗体上3个部分的大小,如图1-11所示。

图1-11  程序运行结果

读者还可以在本实例的基础上进一步扩展,制作出类似于Windows自带的“资源管理器”的界面。 (责任编辑:admin)
推荐教程
关于我们--广告服务--免责声明--本站帮助-友情链接--版权声明--联系我们--网站地图          黑ICP备17004983号-1