如何在MDIForm调用MDICHILD=True的DLL窗体！？？？在线等!

Question

刚才查了一下历史，只有一个模拟的办法，但是效果不好
有没有其他办法？

Answer 1

但是我看到过有这样的软件
金蝶的K3就是掉DLL的
也是这样的
他实现的了啊

Answer 2

那怎么把DLL的菜单放到MDIFORM里？

Answer 3

用api看可不可以实现
Private Declare Function SetParent Lib "user32" (ByVal HwndChild As Long, ByVal HWndNewParent As Long) As Long

Answer 4

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 SubPrivate Sub Command2_Click()
Call SetParent(Me.hWnd, OldContainer)
Me.Move 0, 0
End SubPrivate Sub Form_Load()
Command1.Caption = "移出"
Command2.Caption = "移入"
End SubPrivate Sub MDIForm_Load()
Form1.Show
End Sub

Answer 5

设置好了适当的窗口样式就可以模拟MDI关系了。确切的说不是模拟，就是MDI窗口，因为VB的也是那个样子的。设置完了之后你可以用SetParent吧待加入的子窗体加到MDI窗体中的一个叫MDIClient的子窗体中，可以用GetWindow来获得它说了这些，如果你能够自己操作那就更好了