delphi ExecWB

 

TWebBrowser.ExecWB

 

关键点

procedure ExecWB(cmdID: OLECMDID; cmdexecopt: OLECMDEXECOPT); overload;

 

实现过程

uses OleCtrls, ComObj,
     Mshtml,ActiveX;

//文件
///新建        WebBrowser1.ExecWB(OLECMDID_NEW,1);   //这个不正确 空文档
///打开        WebBrowser1.ExecWB(OLECMDID_OPEN,1);
///保存        WebBrowser1.ExecWB(OLECMDID_SAVE,1);
///另存        WebBrowser1.ExecWB(OLECMDID_SAVEAS,1);
///-
///打印        WebBrowser1.ExecWB(OLECMDID_PRINT,1);
///打印预览    WebBrowser1.ExecWB(OLECMDID_PRINTPREVIEW,1);
///页面设置    WebBrowser1.ExecWB(OLECMDID_PAGESETUP,1);
///-
///属性        WebBrowser1.ExecWB(OLECMDID_PROPERTIES,1);
 
 
///编辑
///撤销    WebBrowser1.ExecWB(OLECMDID_REDO ,1);
///重做    WebBrowser1.ExecWB(OLECMDID_UNDO ,1);
///-
///复制    WebBrowser1.ExecWB(OLECMDID_COPY,1);
///剪切    WebBrowser1.ExecWB(OLECMDID_PASTE,1);
///粘贴    WebBrowser1.ExecWB(OLECMDID_CUT ,1);
///删除    WebBrowser1.ExecWB(OLECMDID_DELETE,1);
///-
///全选    WebBrowser1.ExecWB(OLECMDID_SELECTALL,1);
///不选    WebBrowser1.ExecWB(OLECMDID_CLEARSELECTION,1);
 
 
///查找/替换
///查找对话框 WebBrowser1.ExecWB(OLECMDID_FIND,1);
 

 

 

   


 

备注

cmdID

1. 

  OLECMDID_OPEN  

打开

2. 

  OLECMDID_NEW  

新建

3. 

  OLECMDID_SAVE  

保存

4. 

  OLECMDID_SAVEAS  

另存

5. 

  OLECMDID_SAVECOPYAS  

保存副本

6. 

7. 

  OLECMDID_PRINT  

打印

8. 

  OLECMDID_PRINTPREVIEW  

打印预览

9. 

  OLECMDID_PAGESETUP  

页面设置

10. 

  OLECMDID_SPELL  

11. 

  OLECMDID_PROPERTIES  

文档属性

12. 

13. 

  OLECMDID_UNDO  

撤销

14. 

  OLECMDID_REDO  

重做

15. 

  OLECMDID_DELETE  

删除

16. 

  OLECMDID_CUT  

剪切

17. 

  OLECMDID_COPY  

复制

18. 

  OLECMDID_PASTE  

粘贴

19. 

  OLECMDID_PASTESPECIAL  

特殊粘贴

20. 

21. 

  OLECMDID_SELECTALL  

全选

22. 

  OLECMDID_CLEARSELECTION  

不选

23. 

24. 

  OLECMDID_ZOOM  

25. 

  OLECMDID_GETZOOMRANGE  

26. 

  OLECMDID_UPDATECOMMANDS  

27. 

  OLECMDID_REFRESH  

28. 

  OLECMDID_STOP  

29. 

  OLECMDID_HIDETOOLBARS  

30. 

  OLECMDID_SETPROGRESSMAX  

31. 

  OLECMDID_SETPROGRESSPOS  

32. 

  OLECMDID_SETPROGRESSTEXT  

33. 

  OLECMDID_SETTITLE  

34. 

  OLECMDID_SETDOWNLOADSTATE  

35. 

  OLECMDID_STOPDOWNLOAD  

36. 

  OLECMDID_ONTOOLBARACTIVATED  

37. 

  OLECMDID_FIND  

查找对话框

38. 

39. 

  OLECMDID_HTTPEQUIV  

40. 

  OLECMDID_HTTPEQUIV_DONE  

41. 

  OLECMDID_ENABLE_INTERACTION  

42. 

  OLECMDID_ONUNLOAD  

43. 

  OLECMDID_PROPERTYBAG  

44. 

  OLECMDID_PREREFRESH  

45. 

  OLECMDID_SHOWSCRIPTERROR  

46. 

  OLECMDID_SHOWMESSAGE  

47. 

  OLECMDID_SHOWFIND  

48. 

  OLECMDID_SHOWPAGESETUP  

49. 

  OLECMDID_SHOWPRINT  

50. 

  OLECMDID_CLOSE  

51. 

  OLECMDID_ALLOWUILESSSAVEAS  

52. 

  OLECMDID_DONTDOWNLOADCSS  

53. 

  OLECMDID_UPDATEPAGESTATUS  

54. 

  OLECMDID_PRINT  

55. 

  OLECMDID_PRINTPREVIEW  

56. 

  OLECMDID_SETPRINTTEMPLATE  

57. 

  OLECMDID_GETPRINTTEMPLATE  

58. 

  OLECMDID_PAGEACTIONBLOCKED  

59. 

  OLECMDID_PAGEACTIONUIQUERY  

60. 

  OLECMDID_FOCUSVIEWCONTROLS  

61. 

  OLECMDID_FOCUSVIEWCONTROLSQUERY  

62. 

  OLECMDID_SHOWPAGEACTIONMENU  

63. 

  OLECMDID_ADDTRAVELENTRY  

64. 

  OLECMDID_UPDATETRAVELENTRY  

65. 

  OLECMDID_UPDATEBACKFORWARDSTATE  

66. 

  OLECMDID_OPTICAL_ZOOM  

67. 

  OLECMDID_OPTICAL_GETZOOMRANGE  

68. 

  OLECMDID_WINDOWSTATECHANGED  

69. 

  OLECMDID_ACTIVEXINSTALLSCOPE  

70. 

  OLECMDID_UPDATETRAVELENTRY_DATARECOVERY  

 

 

cmdexecopt

const
OLECMDEXECOPT_DODEFAULT = $00000000;
OLECMDEXECOPT_PROMPTUSER = $00000001;
OLECMDEXECOPT_DONTPROMPTUSER = $00000002;
OLECMDEXECOPT_SHOWHELP = $00000003;

 

相关链接

                           

 

 




posted @ 2014-08-01 18:00  XE2011  阅读(489)  评论(0编辑  收藏  举报