Встраивание MS Word в окно своего приложения

А рискните SetParent

 

>>А рискните SetParent
>С удовольствием Это как?

Ну, приблизительно в таком неправедном духе (там надо кнопочку нажать):

 

Да нет, архив не битый (проверил заново и ИЁ-м, и РеГетом), это что-то с вашими настройками, т.к. теперь и с рарами на васме что-то не то (см. ветку "Аттач" в форуме Васм-Сайт).

А "битым" можно назвать предложенный мной (в шутку и в учебных целях ) способ "просто через SetParent": для таких монстров, как WinWord, последствия вылезают быстро.
Или попробуйте воспроизвести "удочерение" скринсэйвера, как на закладке "Заставка" на панели "Свойства: Экран".

А исходничек - вот он весь целиком:

Код (Text):

1. .386
2. .model  flat,stdcall
3. option  casemap:none
4.  
5. include  \masm32\include\windows.inc
6. include  \masm32\include\user32.inc
7. include  \masm32\include\kernel32.inc
8. include  \masm32\include\shell32.inc
9. includelib \masm32\lib\user32.lib
10. includelib \masm32\lib\kernel32.lib
11. includelib \masm32\lib\shell32.lib
12.  
13. .const
14.   id     equ  100
15. .data
16.   _WW     db "WINWORD.EXE",0
17.   _OA     db "OpusApp",0
18.   _btn    db "button",0  
19. .data?
20.   oldproc dd ?
21.   msg     MSG <>
22. .code
23.  
24. WndProc proc uses ebx hWnd:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
25.   .if uMsg==WM_DESTROY
26.     invoke PostQuitMessage,0
27.     xor eax,eax
28.   .elseif uMsg==WM_COMMAND && wParam==id
29.       invoke    ShellExecute,0,0,offset _WW,0,0,SW_HIDE ;
30.       cmp   eax,33
31.       jae @f
32.       invoke MessageBox,0,offset _OA,0,40000h
33.       ret
34. @@:
35.       invoke Sleep,10
36.       invoke FindWindow,offset _OA,0
37.       test eax,eax
38.       jz @b
39.       mov ebx,eax
40.     invoke SetParent,ebx,hWnd
41.       invoke SetWindowPos,ebx,0,20,40,300,300,SWP_NOZORDER OR SWP_FRAMECHANGED OR SWP_SHOWWINDOW
42.     xor eax,eax
43.   .else
44.     invoke CallWindowProc,oldproc,hWnd,uMsg,wParam,lParam
45.   .endif
46.   ret
47. WndProc endp   
48.  
49. start:
50.   invoke GetModuleHandle,0
51.   push eax
52.   invoke CreateWindowEx,WS_EX_TOPMOST OR WS_EX_CLIENTEDGE,offset _btn,0,WS_OVERLAPPEDWINDOW OR WS_VISIBLE OR WS_CLIPCHILDREN OR BS_OWNERDRAW,10,10,400,400,0,0,eax,0
53.   push eax
54.   invoke SetWindowLong,eax,GWL_WNDPROC,offset WndProc
55.   mov oldproc,eax
56.   pop eax
57.   pop ecx
58.   invoke CreateWindowEx,0,offset _btn,0,WS_CHILD OR WS_VISIBLE,4,4,20,20,eax,id,ecx,0
59.   .while TRUE
60.     invoke GetMessage,addr msg,0,0,0
61.     .break .if (!eax)
62.     invoke TranslateMessage,addr msg
63.     invoke DispatchMessage,addr msg
64.   .endw
65.     invoke  ExitProcess,msg.wParam
66. end start

 

temp666, lamerkz666
Спасибо, ништяк!
Хотя Undocumented EditBox покруче будет