TShellWindows2 TShellWindows void __fastcall TForm1::Button1Click(TObject *Sender) { TShellWindows *Sh = new TShellWindows(NULL); try { for(int i = 0; i Count; i++) { if(Sh->Item(i) == NULL) continue; Draw(Sh->Item(i)); break; } } __finally { delete Sh; } } //--------------------------------------------------------------------------- void __fastcall TForm1::Draw(IDispatch *Idisp) { IWebBrowser2 *IE = (IWebBrowser2 *)N.. 2008. 8. 19. TShellWindows 인데 FindWindow로 변경했을 떄와 같이 HWND를 받을 수 있도록 찾아보자. //--------------------------------------------------------------------------- #include #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "shdocvw_ocx" #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm.. 2008. 7. 18. 이전 1 다음