mainform.dfm

用C语言写的浏览器源码 供学习和交流使用

object Form1: TForm1
  Left = 192
  Top = 107
  Width = 544
  Height = 375
  Caption = '我的浏览器'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object ControlBar1: TControlBar
    Left = 0
    Top = 0
    Width = 536
    Height = 57
    Align = alTop
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 11
      Top = 2
      Width = 519
      Height = 22
      Align = alClient
      AutoSize = True
      Caption = 'ToolBar1'
      Flat = True
      Images = ImageList1
      TabOrder = 0
      object BackButton: TToolButton
        Left = 0
        Top = 0
        Hint = '后退'
        Caption = 'BackButton'
        ImageIndex = 0
        OnClick = BackButtonClick
      end
      object ForwardButton: TToolButton
        Left = 23
        Top = 0
        Hint = '前进'
        Caption = 'ForwardButton'
        ImageIndex = 1
        OnClick = ForwardButtonClick
      end
      object StopButton: TToolButton
        Left = 46
        Top = 0
        Hint = '停止'
        Caption = 'StopButton'
        ImageIndex = 2
        Style = tbsCheck
        OnClick = StopButtonClick
      end
      object RefreshButton: TToolButton
        Left = 69
        Top = 0
        Hint = '刷新'
        Caption = 'RefreshButton'
        ImageIndex = 3
        OnClick = RefreshButtonClick
      end
      object HomeButton: TToolButton
        Left = 92
        Top = 0
        Caption = 'HomeButton'
        ImageIndex = 4
        OnClick = HomeButtonClick
      end
      object ToolButton6: TToolButton
        Left = 115
        Top = 0
        Width = 8
        Caption = 'ToolButton6'
        ImageIndex = 5
        Style = tbsSeparator
      end
    end
    object Panel1: TPanel
      Left = 11
      Top = 28
      Width = 519
      Height = 22
      BevelOuter = bvNone
      TabOrder = 1
      object Label1: TLabel
        Left = 9
        Top = 4
        Width = 32
        Height = 13
        AutoSize = False
        Caption = '地址：'
      end
      object BitBtn1: TBitBtn
        Left = 443
        Top = 1
        Width = 75
        Height = 21
        Caption = '转到&T'
        TabOrder = 0
        OnClick = BitBtn1Click
      end
      object ComboBox1: TComboBox
        Left = 49
        Top = 0
        Width = 389
        Height = 24
        ItemHeight = 16
        TabOrder = 1
        OnKeyUp = ComboBox1KeyUp
      end
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 57
    Width = 536
    Height = 253
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 1
    object TabSheet1: TTabSheet
      object ScrollBox1: TScrollBox
        Left = 0
        Top = 0
        Width = 528
        Height = 222
        Align = alClient
        TabOrder = 0
        object CppWebBrowser1: TCppWebBrowser
          Left = 0
          Top = 0
          Width = 524
          Height = 218
          Hint = '主页'
          TabStop = True
          Align = alClient
          TabOrder = 0
          OnProgressChange = CppWebBrowser1ProgressChange
          OnDownloadBegin = CppWebBrowser1DownloadBegin
          OnDownloadComplete = CppWebBrowser1DownloadComplete
          ControlData = {
            4C00000028360000881600000000000000000000000000000000000000000000
            000000004C000000000000000000000001000000E0D057007335CF11AE690800
            2B2E12620C000000000000004C0000000114020000000000C000000000000046
            0000000000000000000000000000000000000000000000000000000000000000
            00000000000000000100000000000000000000000000000000000000}
        end
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 310
    Width = 536
    Height = 19
    Panels = <
      item
        Width = 400
      end
      item
        Style = psOwnerDraw
        Width = 100
      end
      item
        Width = 200
      end>
    SimplePanel = False
    OnDrawPanel = StatusBar1DrawPanel
  end
  object MainMenu1: TMainMenu
    Left = 26
    Top = 94
    object F1: TMenuItem
      Caption = '文件&F'
      object F2: TMenuItem
        Caption = '打开&F'
        OnClick = F2Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object X1: TMenuItem
        Caption = '退出&X'
        OnClick = X1Click
      end
    end
    object S1: TMenuItem
      Caption = '设置&S'
      object Internet1: TMenuItem
        Caption = '&Internet选项'
        OnClick = Internet1Click
      end
    end
  end
  object ImageList1: TImageList
    Left = 60
    Top = 94
    Bitmap = {
      494C010105000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000003000000001001000000000000018
      000000000000000000000000000000000000386B386B386B386B386B386B386B
      386B386B386B386B386B386B386B386B386B386B386B386B386B386B386B386B
      386B386B386B386B386B386B386B386B386B386B386B386B386B386B386B386B
      386B386B386B386B386B386B386B386B386B386B386B386BEF3DE71C386B386B