Click here to Skip to main content
Click here to Skip to main content

ByPass difficult Automation and add applications "as is" in your .NET application

, 28 Dec 2004
Rate this:
Please Sign up or sign in to vote.
Fed up with automation? Need to add components as is to your application? Try this out.

Introduction

I was given so many tasks of automation. That I was really fed up with them. Once my manager asked me to automate IE as in our application, so that user feels that it's the application's IE browser. One other day, I was asked to add Word control and make a Window in the application with Word look and feel and same Toolbars. So then I thought there must be a way in Dotnet to add the applications "as is" and some kind of communication with them as well.

Note: Of course, the kind of flexibility you achieve with automation can not be achieved via this way. But "according to the requirements", it can reduce time to market and prevent adding heavy automation code and DLLs.

Using the code

I have shown how different applications can be added easily in a control or Form. If you add it in a Form, user will feel that it will become kind of MDI application holding other application. First demo application shows how to add Command Prompt, Internet Explorer, Windows Media Player and WinWord. Second application shows how to interact with them.

Add Applications Demo

Main functions which are used in this case are from user32. That are SetParent, ShowWindow and SetForegroundWindow. Rest of the help is provided by managed Process, ProcessInfo and SendKeys classes.

Declare Function ShowWindow Lib "user32" (ByVal hWnd As System.IntPtr, 
        ByVal nCmdShow As Integer) As Boolean
Declare Function SetParent Lib "user32" (ByVal hWndChild As System.IntPtr,
        ByVal hWndNewParent As System.IntPtr)
        As System.IntPtr
Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As System.IntPtr)
                As Integer

Following code is written on "Open -> Command Prompt-> Open as Normal and Add as Min" menu. It opens the command window using Process.Start() as normal and then adds it to parent window (which is a .NET window) as a sub window using ShowWindow function and makes its state minimized.

Dim pinfo As New ProcessStartInfo("cmd")
Dim p As Process = System.Diagnostics.Process.Start(pinfo)
SetParent(p.MainWindowHandle, Me.Handle)
ShowWindow(p.MainWindowHandle, SW_MINIMIZE)

Second menu is Open ->Get Running Browser and make it full screen. You have to have at least one IE window open for this functionality. It captures it and adds it in the main form as maximized. Closing the application will also close this window.

Dim p As Process() = System.Diagnostics.Process.GetProcessesByName("iexplore")
Try
    SetParent(p(0).MainWindowHandle, Me.Handle)
    ShowWindow(p(0).MainWindowHandle, SW_MAXIMIZE)
Catch ex As Exception
    MessageBox.Show("No IE window open - Please open one")
End Try

Third menu is opening a Media Player and adding it to a button and play a file present in XP Media directory. Open -> Media Player - in a Button - Max. Another interesting point is, Media folder is not listed in Enviornment.SpecialFolders. So you have to get it like the way I have used below:

Dim p As Process = System.Diagnostics.Process.Start("mplayer2", 
Environment.GetEnvironmentVariable("WINDIR") + "\\Media\\Windows XP Startup.wav")
p.WaitForInputIdle()
SetParent(p.MainWindowHandle, Me.Button1.Handle)
ShowWindow(p.MainWindowHandle, SW_MAXIMIZE)

Fourth and last menu is adding WinWord and add it in a Label. Open -> WinWord - In a Label. WaitForInputIdle helps in getting the Winword to an idle state.

Dim pinfo As New ProcessStartInfo("WINWORD")
Dim p As Process = System.Diagnostics.Process.Start(pinfo)
p.WaitForInputIdle()
SetParent(p.MainWindowHandle, Me.Label1.Handle)

Interact with Application (Calc.exe and IE)

Run the demo. Open any website using IE window external from the demo. Click "Get Running IE Window". It will get the running IE window instance and add it to the control and get its HTMLDocument and display all the source in the TextBox. It will also display its title on the label next to the button. Click on the "Open Calc" button. It will open the calc in user Window. Do all the calculations and close the calculator. The result will come back to the TextBox next to "Open Calc" button.

IE demo important points

IE demo uses IEDom class to retrieve the DOM of IE window. IsIEServerWindow function looks for Internet Explorer_Server class. WM_HTML_GETOBJECT message is send to Windows handle using RegisterWindowMessage Win32 call. Then ObjectFromLresult function to get IHTMLDocument object.

If Not IsIEServerWindow(hWnd) Then

   ' Get 1st child IE server window
   win32.EnumChildWindows(hWnd, AddressOf EnumChild, hWnd)

End If

If Not hWnd.Equals(0) Then

  ' Register the message
  lMsg = win32.RegisterWindowMessage("WM_HTML_GETOBJECT")

  ' Get the object
  Call win32.SendMessageTimeout(hWnd, lMsg, 0, 0, _
  win32.SMTO_ABORTIFHUNG, 1000, lRes)

  If lRes Then

    ' Get the object from lRes
    hr = ObjectFromLresult(lRes, IID_IHTMLDocument, 0, IEDOMFromhWnd)

    If hr Then Throw New COMException(hr)

     End If 
  End If
End If

Also used RemoveMenuBar function to remove IE Rebar.

If ClassName.ToString() = "ReBarWindow32" Then
  ' Hide menuBar
  win32.ShowWindow(hWnd, 0)
  Return 0
Else
  Return 1
End If
Calc demo important points

ExteranlCalc form opens calc.exe on load and adds it to itself. removeTitleBarAndRescale function is used to remove the titlebar, stop resizing. SetWindowPos function is used to set the position of the Window and place it in a way to hide menubar of calc.

win32.SetParent(p.MainWindowHandle, Me.Handle)
win32.removeTitleBarAndRescale(p.MainWindowHandle)
win32.SetWindowPos(p.MainWindowHandle, Me.Handle, -LEFT_CONST,
             -TOP_CONST, Me.Width + LEFT_CONST + RIGHT_CONST, 
             Me.Height + TOP_CONST + BOTTOM_CONST, 
win32.SWP_FRAMECHANGED Or win32.SWP_NOZORDER)
Note: I have tested with standard calculator. If you want to show scientific calc, adjust the size of ExternalCalc form. You may also use SendKeys to show the calc in any form. Error checking in all scenarios has not been done on the demos.

Points of Interest

It's very easy way to add applications in your .NET based application. Thanks to Microsoft for making such things Smile | :)

Revision History

12-29-2004:

  • Added a Picture with calc and IE Control and their interaction.
  • Added the source code for calc and IE demo.

11-29-2004:

  • Original article

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

About the Author

Armoghan Asif
Architect
Pakistan Pakistan
No Biography provided

Comments and Discussions

 
QuestionSet Parent is not working PinmemberMember 1027924611-Oct-13 22:21 
Questionwindow becomes transparent in aero theme PinmemberMember 96015292-Dec-12 23:05 
Questionhow to open OUTLOOK in Panel or as MDI Chile, i mean inside window form Pinmemberhardikdarji13-Aug-10 4:50 
GeneralMy vote of 1 Pinmemberkamlesh88513-Feb-09 0:53 
GeneralProblem with word Pinmemberparthmankad4-Jul-08 0:35 
Generalstill not working Pinmemberdjsoul20-Mar-08 3:41 
QuestionHow to call a process By speciying its directory and make displayed inside a label Pinmemberdjsoul1-Mar-08 13:32 
GeneralRe: How to call a process By speciying its directory and make displayed inside a label PinmemberArmoghan Asif3-Mar-08 22:29 
GeneralRe: How to call a process By speciying its directory and make displayed inside a label Pinmemberdjsoul4-Mar-08 10:34 
GeneralRe: How to call a process By speciying its directory and make displayed inside a label PinmemberArmoghan Asif6-Mar-08 22:45 
GeneralRe: How to call a process By speciying its directory and make displayed inside a label Pinmemberdjsoul7-Mar-08 9:41 
GeneralRe: How to call a process By speciying its directory and make displayed inside a label Pinmemberxiaolinmantis11-Dec-08 4:00 
QuestionHow to run my application with for eg, notepad.exe as the child Pinmember--=A J E E S H=--17-Jul-07 23:57 
AnswerRe: How to run my application with for eg, notepad.exe as the child PinmemberArmoghan Asif18-Jul-07 20:14 
AnswerRe: How to run my application with for eg, notepad.exe as the child PinmemberMathew Uthup24-Oct-07 17:27 
QuestionHow to expand to other applications PinmemberTonyL@cox13-Jul-07 2:17 
AnswerRe: How to expand to other applications PinmemberArmoghan Asif13-Jul-07 3:23 
GeneralRe: How to expand to other applications PinmemberTonyL@cox13-Jul-07 13:10 
GeneralRe: How to expand to other applications Pinmemberxiaolinmantis11-Dec-08 4:03 
QuestionC# Example? Pinmemberccaspanello8-Jul-07 19:22 
AnswerRe: C# Example? PinmemberArmoghan Asif13-Jul-07 3:49 
GeneralI need a help Pinmembertamilarasi30-May-07 23:08 
I need to capture screen and store it to a .jpg file in asp.net
 
is it possible or not?
 
will you please tell me
 
tamil

AnswerRe: I need a help PinmemberArmoghan Asif1-Jun-07 1:26 
GeneralThank You!!! PinmemberStonebraker18-May-07 11:39 
GeneralOpen a web Browser with the correct user and password! PinmemberAssaf Koren6-Mar-07 13:45 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Mobile
Web02 | 2.8.140721.1 | Last Updated 29 Dec 2004
Article Copyright 2004 by Armoghan Asif
Everything else Copyright © CodeProject, 1999-2014
Terms of Service
Layout: fixed | fluid