总发生1407错误,Class not found:
以下是Delphi代码,汇编高手请教!
        //创建一个WebBrowser
        CreateWindowEx(0, 'Internet Explorer_Server','WebBrowser1',
                WS_CHILD + WS_VISIBLE,13,
                47,324,200, hWnd, 1,
                hInstance, nil);
        asm
          mov hWebBrowser, eax
        end;
        if hWebBrowser  = 0 then
           MessageBox(hWnd, PChar('错误代码是:' + IntToStr( GetLastError )), 'Error', MB_OK);

解决方案 »

  1.   

    居然还有这样创建WEBBROWSER的。
    这句汇编纯粹故弄玄虚,它仅仅是取返回值而已。
            asm
              mov hWebBrowser, eax
            end;
    相当于
    hWebBrowser:=CreateWindowEx(...
      

  2.   

    你直接用internet里的webbrowser,何必这摸麻烦啊
      

  3.   

    忘了告诉大家我的目的,这样做是为了减少EXE文件大小减少到30K一下,你说的对,那行汇编的确是虚的:)
      

  4.   

    你想大大减少EXE大写,嵌入汇编反而造成编译器无法对它优化,起不了什么效果。
    倒不如替换掉SYSTEM.PAS单元。
      

  5.   

    我可以不用汇编仍然可以让EXE小很多。比如小到20-30K,原先起码是600K