首页 >> 读书频道 >> 电脑 >> 将MdiForm内的Form移出MdiForm
 
· 侦测离开Form进入其他
· Disable Form
· 隐藏TextBox的Ca
· 按下HotKey以叫起视
· 按下某组键(HotKey
· 隐藏Mouse
· 呼叫内定的Brower以
· 任意角度旋转图形
· VB中实现“擦视”技术下
· 得知目前Mouse所指的
· Memory DC 与h
· 有 BitMap 之Me
 
· 电视剧《刁蛮公主》下载和
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
· 武林寓言故事
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

将MdiForm内的Form移出MdiForm


查看有无更新版本

关键字:VB 2006-9-18

 

事实上,这是设定Container的问题,但Form中没有Container的属性,所以使用SetParent
来做,不过,这和VB中Parent的属性是不太相同的,VB的Parent指的是这个控制项(或
window)是哪一个Window的子Window(Parent Window destory时Child Window也会Destory)
而VB的Container指的是子控制项会随着Container所指的Window来定位置,例如:command1
放在Frame中,则Command Button的Parent是Form,而Container是Frame,即Command Button
随Frame移动,但Form结束时也随之Destory。
而SetParent是指Container的转换,而非VB中Parent属性的转换。

'需一个MdiForm ,一个Form1并事先设其MdiChild = True, 另有2个Command Button
' below is in Form1
Option Explicit
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private OldContainer As Long
Private Sub Command1_Click()
OldContainer = SetParent(Me.hWnd, 0)
End Sub

Private Sub Command2_Click()
Call SetParent(Me.hWnd, OldContainer)
Me.Move 0, 0
End Sub

Private Sub Form_Load()
Command1.Caption = "移出"
Command2.Caption = "移入"
End Sub

' below is in MDIForm1
Private Sub MDIForm_Load()
Form1.Show
End Sub


将MdiForm内的Form移出MdiForm

[ 1 ]
将MdiForm内的Form移出MdiForm num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑