我想到个办法,新建工程,新建个窗口FORM2 FORM1的ShowInTaskbar属性设为FALSE FORM2 ShowInTaskbar属性设为true Form1中代码:Private Sub Form_Load() Form2.Top = 50000 Form2.Left = 50000 Form2.Show End Sub Private Sub Form_Unload(Cancel As Integer) Unload Form1 Unload Form2End SubForm2中代码:Dim n As Integer Private Sub Timer1_Timer() If n > 30000 Then n = 0 n = n + 1 Me.Caption = n End Sub完-------------- 非常easy!!!
而点击真窗口最小化时,真窗口需要隐藏,这时的窗口动画是不一样的,由于真窗口没有任务栏,所以会先归缩到左下角然后才消失。DVD Decrypter 的焦点转换没有这种现象,就像普通窗口一样。
FORM1的ShowInTaskbar属性设为FALSE
FORM2 ShowInTaskbar属性设为true
Form1中代码:Private Sub Form_Load()
Form2.Top = 50000
Form2.Left = 50000
Form2.Show
End Sub
Private Sub Form_Unload(Cancel As Integer)
Unload Form1
Unload Form2End SubForm2中代码:Dim n As Integer
Private Sub Timer1_Timer()
If n > 30000 Then n = 0
n = n + 1
Me.Caption = n
End Sub完--------------
非常easy!!!
应该先启动 Form2,再模态显示 Form1,将 Timer 移动到 Form1 中,这样点任务条焦点就会定位到 Form1 上