不好意思，回歸到這個主題上！希望各位先進們指導及解答。 EX : 假如我想將其他AP,Include到自己的MDIForm中,並和其他MDIChild同時 做並排、縮放功能,這樣該如何實現呢？

(1)執行程式 use ShellExecute (2)sleep一陣子，再用findwindows去捉handle (3)用SetWindowLong 設定叫出的程式為child (4)用::SetParent 設定ap的parent = 你的MDI MAIN FORM (5)監控AP的位置，不要讓他超過MAIN FORM    以上四步可以，第五步我還沒實作出來 這是我的想法和做法，我沒說他是正解，大家討論看看 謝謝

想了很久，還沒自已try 出來 不過發現，已經有人做出來了 請見 http://delphi.ktop.com.tw/topic.php?topic_Id=25565

turboted 謝謝你,小弟終於測出來了,並將Delphi改成Bcb版,附上原始碼如下。 參考文件 http://delphi.ktop.com.tw/topic.php?topic_Id=25565 //--------------------------------------------------------------------------- void __fastcall TForm1::FormCreate(TObject *Sender) { // 先執行要放入專案的外部EXE檔案(用隱藏方式來執行) WinExec("C:\\WINNT\\NOTEPAD.EXE",SW_RESTORE ); // 再找到該外部EXE檔案 if(HWND H1 = FindWindow(NULL,PChar("未命名 - 記事本")) ) { // 假設找到執行之程式後要放在 Panel1 HWND H2 = Panel1->Handle; // 將外部程式放在 Panel1 ::SetParent(H1,H2); // 設定外部程式顯示的位置及大小 // MoveWindow(hWnd,X,Y,W,H,B) : RETURN BOOL // hWnd: HWND // X:Integer; {horizontal} // Y:Integer; {vertical} // W:Integer; {the new window width} // H:Integer; {the new window height} // B:BOOL; {the repaint flag} MoveWindow(H1,0,0,Panel1->Width,Panel1->Height,true); // ::ShowWindow(H1,SWP_SHOWWINDOW); } } //--------------------------------------------------------------------------- 發表人 - tacohsu 於 2003/05/24 01:45:04