Third-party controls in place of the WebBrowser control in Delphi

Source: Internet
Author: User

These days, contact with the embedded Web page in Delphi, with Delphi7 of the Twebbrowser control, the display content and the IE8 display of the same, but with the installation IE8 before the IE6 show an effect. Now hurrying feet is one of the following two reasons:

1.Navigate This method with a bit of a problem, with different parameters and Navigate2 and other methods, the call of the IE kernel version is different

2. This self-contained control with a bad mood, a direct change to a third party control

For the 1th, looking for half a day to find what, hurriedly converted ideas, so found theEMBEDDEDWB This third-party control ... Download site: http://www.delphifans.com/SoftView/SoftView_2705.html or http://d.download.csdn.net/detail/randb/631380 Installation method in Delphi7: http://salomi.blog.51cto.com/389282/125954
And a couple of other I hurrying feet useful URLs to solve this problem: Delphi Third party control EMBEDDEDWB use method: http://hi.baidu.com/cyrist/blog/item/ E8782ea4c64919ec9052eedc.html a post with reference value: http://topic.csdn.net/u/20120310/12/ 32b22ac0-8e5f-4f9f-9083-b8c7aaa52380.html?seed=587680286&r=77849641#r_77849641 How to use Delphi to call IE Open Web page: http:// BLOG.CSDN.NET/MRWU9902/ARTICLE/DETAILS/4954555 about the controls that invoke other browser kernels (I installed the Mozilla ActiveX control using the Firefox kernel, but when the code was invoked, the error was wrong, no matter what, Interested colleagues can study the following):
http://topic.csdn.net/u/20090527/09/58387179-3fe8-49d7-9d95-9d9c00767e65.htmlHttp://topic.csdn.net/u/20120215/17/8501dc38-742e-47cb-bad1-35ef2a7bd0cc.html
Http://delphi.about.com/b/2005/01/15/using-firefox-instead-of-twebbrowser-in-delphi-applications.htm
Http://www.paranoia.clara.net/articles/taming_the_lizard_with_delphi.html
http://www.adamlock.com/mozilla/
After doing these lessons, I hope that the problem can be solved smoothly next Monday ... 2012.03.25 Update////////////////////////////////////////////////////////// Recently, there is no time to pay attention to this problem, I do not know that the Web page is the reason for the use of the script or other reasons, alas, the result is not yet I want the 1.EmbeddedWB and twebbrowser to achieve the same effect, with IE8 effect is not the same, there is a saying is " The two controls are not calling the IE kernel of the native, but rather the IE6 kernel called in delphi7 ... I'm not sure yet. 2. Google control Delphi Chromium embedded:http://code.google.com/p/delphichromiumembedded/This installed, to the EXE output path set to def/win32/ Bin, if you modify the source code, seemingly can not always put the generated EXE to put that directory, did not achieve the effect I want, did not study the problem ... After this use, open the Web page, half a day did not respond, the window seems to die in that ... There is a master who saw this, know the reason, but also leave a message pointing a few words ... 3. There is also geckobrowser for Delphi This control, has not yet studied how to use this thing ... 4. This one can change the display of IE browser window

Procedure Openinie (aurl:string);
    var ie:variant;
Begin
    IE: = Createoleobject (' internetexplorer.application ');

    Fea Visible: = true; Visible
    Ie.left: = 0;
    Ie.top: = 0;
    Ie.height: = 1050; Height
    ie.width: = 1680;//width
    Ie.menubar: = 0;//Cancel menu bar
    Ie.addressbar: = 0;//Cancel Address bar
    Ie.toolbar: = 0;//Cancel Toolbar
    Ie.statusbar: = 0;//Cancel status bar
    Ie.resizable: = 0; The user is not allowed to change the window size
    IE. Navigate (Aurl);
End
5.
Procedure Tform1.button2click (sender:tobject);
Begin
  ShellExecute (Handle, ' open ', ' IExplore.EXE ', ' http://www.baidu.com ', nil, SW_SHOWNORMAL);
End

6.
Procedure Tieshowfrm.formcreate (sender:tobject);
var
  flags:olevariant;
Begin
  //webbrowser1.navigate (widestring (' http://www.baidu.com '), flags, flags, flags, flags);
  WebBrowser1.Navigate (' http://www.baidu.com ');
End

PS: If there is any breakthrough, then to add ...

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.