Waiting for another app

[XavierD]

I have a app that needs to wait until Acrobat fully opens to do some processing. I use the FindWindow api call but it returns that it found Acorbat before Acrobat is done initiallizing.
Does anybody have any idea how I can get my program to wait long enough for Acrobat?

[Matthew Gates]

You could try using a DoEvents.
Or you could try using the AppActivate Statement and make it wait.

AppActivate title[, wait]

[Nucleus]

You could also try building in a delay long enough to allow for acrobat to open.

Option Explicit
Private Declare Function GetTickCount Lib "kernel32" () As Long
 
Private Sub Command1_Click()
    '//2000ms Delay
    Delay 2000
End Sub
 
Private Sub Delay(ByVal interval As Long)
Dim i&
    i = GetTickCount
    Do While GetTickCount - i < interval
        DoEvents
    Loop
End Sub