|
发表于 2008-7-22 23:29:00
|
显示全部楼层
本人经过大量试验找出了两种解决办法:
1、.net的正宗用法:
Me.Parent = Myc
Me.TopMost = True
(其中me是当前窗体,myc是CAD的application)
2、VB6的API函数setparent (我认为这一方法最不可思议,函数也能改)
Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
这个申明函数改一下:
Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As integer, ByVal hWndNewParent As Long) As Long
|
|