Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 171
  • Last Modified:

application and my app

hi all,
how are you?
I want to run another application and fix that into my form.
Yes, i can run an application by apishell, but how can i fix it into my application? i don't want to see 2 windows.
thanks alot.
0
tnhphuong
Asked:
tnhphuong
1 Solution
 
tobjectpascalCommented:
Add a Panel onto your Form.

procedure TForm1.Button1Click(Sender: TObject);
Var
 H: HWnd;
begin
 H:=FindWindow('notepad',nil);
 If H<>0 Then
  Begin
    Windows.SetParent(H,Form1.Panel1.Handle);      SendMessage(Form1.Panel1.Handle,wm_command,SC_MAXIMIZE,0);
  End;
end;
0

Featured Post

Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now