unit1.dfm

利用delphi做的很简单网页浏览器

object Form1: TForm1
  Left = 222
  Top = 138
  Width = 700
  Height = 511
  Caption = #32593#39029#27983#35272#22120' - '#23567#31934#28789#24037#20316#23460
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 692
    Height = 48
    Bands = <>
    object SpeedButton1: TSpeedButton
      Left = 16
      Top = 5
      Width = 50
      Height = 33
      Caption = #21518#36864
      Enabled = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 97
      Top = 5
      Width = 50
      Height = 32
      Caption = #21069#36827
      Enabled = False
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 179
      Top = 5
      Width = 50
      Height = 32
      Caption = #21047#26032
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 261
      Top = 5
      Width = 50
      Height = 33
      Caption = #20572#27490
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton
      Left = 352
      Top = 5
      Width = 50
      Height = 33
      Caption = #20027#39029
      OnClick = SpeedButton5Click
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 48
    Width = 692
    Height = 41
    Align = alTop
    TabOrder = 1
    DesignSize = (
      692
      41)
    object StaticText1: TStaticText
      Left = 16
      Top = 8
      Width = 36
      Height = 24
      Caption = #32593#22336
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object ComboBox1: TComboBox
      Left = 64
      Top = 8
      Width = 537
      Height = 21
      Ctl3D = False
      ItemHeight = 13
      ParentCtl3D = False
      TabOrder = 1
    end
    object BitBtn1: TBitBtn
      Left = 614
      Top = 8
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = #36716#21040
      Default = True
      TabOrder = 2
      OnClick = BitBtn1Click
    end
  end
  object WebBrowser1: TWebBrowser
    Left = 0
    Top = 89
    Width = 692
    Height = 349
    Align = alClient
    TabOrder = 2
    OnDownloadBegin = WebBrowser1DownloadBegin
    OnDownloadComplete = WebBrowser1DownloadComplete
    OnDocumentComplete = WebBrowser1DocumentComplete
    ControlData = {
      4C00000085470000122400000000000000000000000000000000000000000000
      000000004C000000000000000000000001000000E0D057007335CF11AE690800
      2B2E126208000000000000004C0000000114020000000000C000000000000046
      8000000000000000000000000000000000000000000000000000000000000000
      00000000000000000100000000000000000000000000000000000000}
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 438
    Width = 692
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object MainMenu1: TMainMenu
    Left = 616
    Top = 8
    object N1: TMenuItem
      Caption = #25991#20214
      object N2: TMenuItem
        Caption = #25171#24320'...'
        OnClick = N2Click
      end
      object N3: TMenuItem
        Caption = #21478#23384#20026'...'
        Enabled = False
        OnClick = N3Click
      end
      object N5: TMenuItem
        Caption = #36864#20986
        OnClick = N5Click
      end
    end
    object N6: TMenuItem
      Caption = #26597#30475
      object N7: TMenuItem
        Caption = #21518#36864
        OnClick = N7Click
      end
      object N8: TMenuItem
        Caption = #21069#36827
        OnClick = N8Click
      end
      object N9: TMenuItem
        Caption = #21047#26032
        OnClick = N9Click
      end
      object N10: TMenuItem
        Caption = #20572#27490
        OnClick = N10Click
      end
    end
    object N11: TMenuItem
      Caption = #24110#21161
      object N12: TMenuItem
        Caption = #20851#20110'...'
        OnClick = N12Click
      end
    end
  end
  object XPManifest1: TXPManifest
    Left = 568
    Top = 8
  end
end