关于右键菜单实现子窗口最大化,最小化,还原和关闭的小感想

来源:互联网 发布:加工中心编程高清图纸 编辑:程序博客网 时间:2024/04/29 00:34

小的虽然接触delphi也有一段时间了,但是由于之前没有心机去学,导致丢弃了一段时间,现在捡起来才发现基本什么都不会,基础也很差!也找不到什么好的书来学习,只能边google,边度娘的来学习,也有热心网友的帮忙!

最近在自己弄个小系统,想实现下右键菜单的还原,最大/小化,关闭的功能!

可是google,度娘也没啥资料,倒是网友们有点牛,可是小的实在蠢钝,搞不懂!只好用笨办法来实现!

实现所需控件:2个以上form,popupmenu1个,toolbar1个,toolbarbutton数个(根据子窗口数量而定,要想好看点的button可以用其他的button或自己写个)

我的程序有form6个,包含登陆窗口1个,共7个,form3为父窗,form2为登陆窗,其他为子窗

toolbar和popupmenu在父窗体里,设计号界面

贴代码噜!

下边的是popupmenu的代码,实现的是当form最大化时,右键按钮最大化不可用!

case里边的代码都是重复使用的~我试过把里边的代码做成一个函数,直接在with form do后边调用~可是这样的话就没有了效果了,很奇怪!

有木有大神会弄,指教下,能让我改得精致点!


下边的是最大化等按钮的事件代码,按照按钮的需求改变Form的WindowState


一开始真的不知道怎么去写,都是用一个popupmenu的事件,要是不同form之间的不同最大化最小化状态,那该怎么弄,有热心的网友说用主窗口.MDIChaildren[i]来控制,作为判断条件,但是我怎么都弄不来,只好用笨办法。popupcompinent这个属性还是我在度娘的时候看到一个帖子的时候来灵感才搞定的呢!


小的代码缺点就是是很多form的时候就会写很长很长,现在我自己就5个子窗都写了很长了,希望大神有什么好的建议可以指教指教小的,能改的精致点!

0 0
原创粉丝点击