unit1.~h

开发环境c++ builder 6.0。主要功能是实现ie浏览器

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include "SHDocVw_OCX.h"
#include <OleCtrls.hpp>
#include <ToolWin.hpp>
#include <ImgList.hpp>
#include <Grids.hpp>
#include <ValEdit.hpp>
#include <Buttons.hpp>



#include   <mshtml.h>       //去掉滚动条
//---------------------------------------------------------------------------
class TWebMain : public TForm
{
__published:	// IDE-managed Components
        TPanel *Panel1;
        TComboBox *URLComboBox;
        TStatusBar *StatusBar1;
        TCppWebBrowser *HTML;
        TToolBar *ToolBar1;
        TBitBtn *BitBtn1;
        TBitBtn *BitBtn2;
        TBitBtn *BitBtn3;
        TBitBtn *BitBtn4;
        TBitBtn *BitBtn5;
        TCppWebBrowser *CppWebBrowser1;
        TCppWebBrowser *CppWebBrowser2;

        void   __fastcall   OnWMSysCommand(TMessage&   Message);   //屏蔽Alt+F4




        void __fastcall URLComboBoxClick(TObject *Sender);
        void __fastcall URLComboBoxKeyPress(TObject *Sender, char &Key);
        void __fastcall gobtnClick(TObject *Sender);
        void __fastcall zhuandaoClick(TObject *Sender);
        void __fastcall qianjinClick(TObject *Sender);
        void __fastcall houtuiClick(TObject *Sender);
        void __fastcall zhuyeClick(TObject *Sender);
        void __fastcall shuaxinClick(TObject *Sender);
        void __fastcall HTMLNewWindow2(TObject *Sender, LPDISPATCH *ppDisp,
          VARIANT_BOOL *Cancel);
        void __fastcall StatusBar1Click(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall HTMLStatusTextChange(TObject *Sender, BSTR URL);
        void __fastcall HTMLDocumentComplete(TObject *Sender,
          LPDISPATCH pDisp, Variant *URL);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall BitBtn5Click(TObject *Sender);
        void __fastcall BitBtn1Click(TObject *Sender);
        void __fastcall BitBtn2Click(TObject *Sender);
        void __fastcall BitBtn3Click(TObject *Sender);
        void __fastcall BitBtn4Click(TObject *Sender);
        void __fastcall CppWebBrowser1NewWindow2(TObject *Sender,
          LPDISPATCH *ppDisp, VARIANT_BOOL *Cancel);
        void __fastcall CppWebBrowser1StatusTextChange(TObject *Sender,
          BSTR URL);
        void __fastcall CppWebBrowser2NewWindow2(TObject *Sender,
          LPDISPATCH *ppDisp, VARIANT_BOOL *Cancel);
        void __fastcall CppWebBrowser2StatusTextChange(TObject *Sender,
          BSTR URL);
        void __fastcall CppWebBrowser1DocumentComplete(TObject *Sender,
          LPDISPATCH pDisp, Variant *URL);
        void __fastcall CppWebBrowser2DocumentComplete(TObject *Sender,
          LPDISPATCH pDisp, Variant *URL);
private:	// User declarations

        bool   m_bOver;

public:
	// User declarations
        __fastcall TWebMain(TComponent* Owner);


  BEGIN_MESSAGE_MAP   //屏蔽Alt+F4
  MESSAGE_HANDLER(WM_SYSCOMMAND,TMessage,OnWMSysCommand)  //屏蔽Alt+F4
  END_MESSAGE_MAP(TForm)      //屏蔽Alt+F4

};
//---------------------------------------------------------------------------
extern PACKAGE TWebMain *WebMain;
//---------------------------------------------------------------------------
#endif