如何做到全屏显示时隐藏菜单，鼠标移动上去才显示菜单？像word2000里那样
D dali2000 Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-08 #1 如何做到全屏显示时隐藏菜单，鼠标移动上去才显示菜单？像word2000里那样
Z zbdzjx Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-08 #2 加一个新的form，默认时，高度只有几个象素高，当鼠标移上去时，高度改成几十个象素高，如果离开了，再改成几个象素高。
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-10 #3 procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);begin if y<5 then self.Menu:=MainMenu1 else self.Menu:=nil;end;
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);begin if y<5 then self.Menu:=MainMenu1 else self.Menu:=nil;end;
D dali2000 Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-11 #4 我现在是已经在全屏显示状态下了，菜单已经消失了，现在的问题就是要显示它，但并不是回到正常显示模式，状态还是在全屏显示状态下，只是鼠标移动到屏幕最上面的一部分区域时，那个主框架的菜单就会出现在最上面 其实我的要求就是跟word全屏显示是一样的，鼠标移动到全屏显示界面最上方时候，菜单就出现，移下来，菜单就消失了
我现在是已经在全屏显示状态下了，菜单已经消失了，现在的问题就是要显示它，但并不是回到正常显示模式，状态还是在全屏显示状态下，只是鼠标移动到屏幕最上面的一部分区域时，那个主框架的菜单就会出现在最上面 其实我的要求就是跟word全屏显示是一样的，鼠标移动到全屏显示界面最上方时候，菜单就出现，移下来，菜单就消失了
Z zbdzjx Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-11 #5 按我的說法，放一個form，設成置頂，然後變高度來實現。
D dali2000 Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-11 #6 to zbdzjx: 你的方法可以实现，但菜单已属于另一个form而不是主窗口，菜单的功能代码书写很不方便
S stlont Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-12 #8 if mouse Y=0 then showmenu
H hs-kill Unregistered / Unconfirmed GUEST, unregistred user! 2010-12-13 #9 我写的可以啊 你是怎么全屏的 只要是WIN窗口 我那个就可以用啊
