How to get the correct Window Handle for a application opened using createprocess api

[Sasie7679]

Dear All,

We have a requirement to open any document with a specific application and display it within a OCX control (Example - word, excel, adobe reader, MSPaint, Photoshop etc). We are using CreateProcess Api to open the application. This APi returns process id and process handle. Once the application is opened, i need the exact window handle to show within the container (OCX control). I use "EnumWindow s" to enumerate all top level windows and check
whether there is no parent and check for the process id. If the process id matches, i check the application class name to get the exact handle (many handles are returned for the same process id). I beleive the application class name will be unique for each window handle. Is there a better way to get the exact window handle for the application opened using createprocess?

=============== =============== =============== =============Co de:

ReDim malngWindowHand les(0) As Long
lngRetVal = EnumWindows(Add ressOf EnumWindowsProc , lngParam)

For lngHandle = 1 To UBound(malngWin dowHandles)
lngRetVal = GetWindowLong(m alngWindowHandl es(lngHandle), GWL_HWNDPARENT)
If lngRetVal = 0 Then
If lngProcessId = GetProcIDFromWH andle(malngWind owHandles(lngHa ndle)) Then
strClassName = Space$(256)
lngClassLength = GetClassName(ma lngWindowHandle s(lngHandle), strClassName, 256)
strClassName = UCase$(Trim$(Le ft$(strClassNam e, lngClassLength) & ""))
strClassName = """" & strClassName & """"
If InStr(strAppCla ssName & ",", strClassName & ",") > 0 Then
GetApplicationH andle = malngWindowHand les(lngHandle): Exit For
End If
End If
End If
Next

=============== =============== =============== =============== =============== =============== ====

Thanks & Regards,
Sasie