Third-party controls in Delphi instead of WebBrowser controls

Original address: http://blog.csdn.net/nanfeiyannan/article/details/7341492

These days, contact with the embedded Web page in Delphi, with the delphi7 of the Twebbrowser control, display the content and the native IE8 display is not the same, but with the IE6 before the IE8 display an effect. Now Bright is one of the following two reasons:

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

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

for the 1th, looking for a half-day to find what, hurriedly converted ideas, so found the EMBEDDEDWB This third-party control ...

Download Address: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
also attached are a few useful URLs that I bright to solve this problem: How to use Delphi third-party control EMBEDDEDWB: http://hi.baidu.com/cyrist/blog/item/e8782ea4c64919ec9052eedc.html a post with a reference value: http://topic.csdn.net/u/20120310/12/32b22ac0-8e5f-4f9f-9083-b8c7aaa52380.html?seed=587680286&r= 77849641#r_77849641 how to invoke IE to open a webpage with Delphi:http://blog.csdn.net/mrwu9902/article/details/4954555 about the control that calls the other browser kernel (i installed the Mozilla ActiveX control using the Firefox kernel, but when the code is called, I get an error, I don't care, the interested colleagues can study it):

Http://topic.csdn.net/u/20090527/09/58387179-3fe8-49d7-9d95-9d9c00767e65.html

http://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, do not know that the Web page is the reason for the script or other reasons, alas, the result is not yet get what I want 1.EmbeddedWB and Twebbrowser achieve the same effect, with the IE8 effect is not the same, there is a saying is "These two controls are not called the native IE kernel, in delphi7 but called the IE6 kernel" ... I'm not sure yet ... 2. Google controlsDelphi Chromium embedded:http://code.google.com/p/delphichromiumembedded/ this installed after, to the EXE output path set to Def/win32/bin, if the source code changes, seemingly can not always put the generated EXE put that directory, did not realize I want the effect, did not study the problem ... after this use, open that webpage, half a day did not respond, the window seems to die in that ... Have any master see this, know the reason, also please leave a message pointing a few words ... 3. There is also geckobrowser for Delphi This control, has not studied how to use this thing ... 4. This kind of self can change the display in IE browser window

2. procedure  Openinie (aurl: string);
4. var  ie:variant;
6. begin   
8. IE: = Createoleobject (' internetexplorer.application ');
12. IE. Visible: = true ;  //Visible   
14. IE. Left : = 0  ;
16. IE. Top: = 0  ;
18. IE. Height: = 1050 ;  //Height   
20. IE. Width: = 1680 ;  //Width   
22. IE. MenuBar: = 0 ;  //Cancel menu bar   
24. IE. Addressbar: = 0 ;  //Cancel Address bar   
26. IE. toolbar: = 0 ;  //Cancel toolbar   
28. IE. StatusBar: = 0 ;  //Cancel status bar   
30. IE. resizable: = 0 ;  //Do not allow user to change window size   
32. IE.  Navigate (Aurl);
34. End  ;

5.

1. procedure TForm1 .  Button2click (Sender:tobject);
2. begin   
3. ShellExecute (Handle, ' open ', ' IExplore.EXE ', ' http//  Www.baidu.com ', nil, SW_SHOWNORMAL);
4. End  ;

6.

1. procedure tieshowfrm .  formcreate (Sender:tobject);
2. var   
3. Flags:olevariant;
4. begin   
5. //webbrowser1.navigate (widestring (' http://www.baidu.com '), flags, flags, flags, flags);   
6. WebBrowser1.  Navigate (' http://www.baidu.com ');
7. End  ;

PS: If there is any further breakthrough, then add it ...