fmain.dfm

来自「使用TCppWebBrowser控件实现的浏览器」· DFM 代码 · 共 1,391 行 · 第 1/5 页

object fmMain: TfmMain
  Left = 299
  Top = 120
  Width = 570
  Height = 479
  Caption = 'MDI Application'
  Color = clWindow
  TransparentColorValue = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clBlack
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIForm
  Icon.Data = {
    0000010001002020000000000000A80800001600000028000000200000004000
    0000010008000000000000000000000000000000000000000000000000000000
    0000FFFFFF000000000083505000875454008956560087565600FFACAC00FFCC
    CC00F2CCCC00FFFDFD00FFFEFE008B5958008D5C5B00905F5E00926260009466
    64009B6B6900A5767100AA807B0086564E00B3807300FFC9BB00CBA59500D2AC
    9900F1EFEE006A473300FFCCB100DCB59E00C1A3900069503F00FFCDAB007764
    57005E443100714F34008A725E00BD691F00603C1D006D4D2F00795D43009875
    55008B6D5300E5B99100E5C0A000F0D6BE00FFE6CF00FAE5D200FFF1E400ECDF
    D300F5EDE600FFF8F200DA852E00B6753400966A3D0079563500916E4C00F9C6
    9600A0816300AC8D6E00FFD8B100FCD5AF00FFD9B200FDD7B100FFDAB500FFD9
    B500FFDBB600FBD7B400EBC9A800FEDBB800FFDDBA00F5D5B400FFDEBE00FBDB
    BB00FFE0C200FFE2C500F7DBBF00FFE3C700FFE4C900FFE4CA00F7DEC500FFE8
    D200F7E2CD00CCBBAA00FFEAD600F0DDCA00FFEBD800E8D6C400FFEDDB00FFEE
    DE00FFF0E100FFF4E900FFF5EB00EFE6DD00FFF6ED00FAF1E800FFF7EF00FFFA
    F500FEF9F400FFFBF700FFFEFD00E48F2F00DF882E00D5832C00EA923100DB8B
    3500E3923900754E22008D5E2A00A2733F00B989560085654300D2AF8A00C5A6
    8300F7D1A900FFDCB700EED2B5009A897700FFE4C700B19E8A00FFE6CC00C5B2
    9E00E2CEB900D5C4B200F9E9D800F1E3D400DED2C500FFF2E400FFF3E600DB75
    0000E6932C00E8942E00DC8B2B00BF7A2600ED993200EC973200E7963200EF9A
    3600F29E3900F4A23D00C0843B00CD924A00AA7E4800C89B6300D9AA7100BB9E
    7D00AE987E00E5DCD100FBF5EE00D98B2600CF852400E5942900E7962D00E494
    2C00EA993000CC872A00EE9E3300EF9F3500F8A840007B532100E39A3E00A170
    2E00CB8E3E00FBC47A00EFEBE600FFFCF800F58F0000CF882200E2952700E699
    2900E5962900EA9D2C00E7992C00D38B2800FFAB3600F1A53700F3A93A00F9AD
    3E00D9963900FDB95300E2AA5C00B6956500FDF3E400FFFDFA00E49A2600E69D
    2900D8932800E9A02F00DF9C3500F4AE4300FAB44700EBAC4900EAB96C00FFE7
    C200FEF5E700FAAC2800EAA42A00E7A12900E09F2900EBA83000F9B43500F3AC
    3400C58C2A00F5B13B00E3B15600D4BB9000ECAA2B00F3B33500FCBB3B00ECB1
    3B00EFB02F00F7BC3B00DAAC4C00FACB6700DBB66700F1B62F00F3BA3600F8C9
    5900E1C47B00DFC48600FBE6B400FBF1DA00F6C44100F8C94400E3B94B00FCD6
    7300ECD28800FBE09500EFDAA300F3E6C300E8C24E00E5C45C00EDD89600E0CE
    9A00EBE2C500FFFEFB00E6C96000EBD07600FCE18400F9E6A100F8D44D00F6D7
    5700FEE98F00F1ECD900FBE56000F4DD6500FDED9B00FFF6B400FFF59500FFF6
    A900FCF37000FFFEB200FFFEBE00FDFDFD00FAFAFA00F5F5F500707070000202
    0202020202020202020202020202020202020202020202020202020202020202
    02020202FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02020202
    0202020213131212121211111110100E0D0F0E0E0C0C0E0E0C0506FF02020202
    020202020F7B2E514C514949494B474B474B474B474B474B471F05FF02020202
    028D398D1352711B71713C42444441444444444441724444411F05FF02020284
    98B38F8F35393AB490B4906F2B7144454545454545454545721F05FF0202A0C7
    39020202136B6A229E36362729912B464545454547474547451F05FF020284B1
    020202236A3468B1BED3B38E6C366E6F4647474747474747471F05FF020284B9
    39026E84888A8A8A9DBDB2E0EDDA37277073474949494949491F0CFF02026DC4
    6E6EB1AF8A8886676785AEBDD4F1EE3927184B4A4A4A494A491F0DFF0202B4CE
    84C9AFAE9982816734348185AFD8F1EE3739434C4C4C4C4C4C1F0EFF0202B4BB
    C7C8AEAAA99683342B2B336486AEB2F5DA37CC4F4E4D4D4D4D1F0FFF0202028E
    CFCEBAAB969434777777733434348B8C8F8F2B4F77777777771F10FF020202B4
    D0D7C3B7A79A6B4D4D4D4D4D4D4D4D4D4D4C514D4D2D2D502D1F10FF02020202
    8CDDD1C4B7A6222222222222222222222222902D2D505050501F11FF02020202
    8ED3D2CDC3C5A7B9989898986464679FBF6E905053535353531B11FF0202026D
    0270EFDDD1C56D6D6D6D6D6D9999859DE06E915357555555551B11FF020202D3
    E7028EEFDDB9A05857575734AB97978AB26C175757575757571B12FF020202D3
    E0E102D5EFC523DC59595284A8A89789BE8D7A5758585858581B12FF02020202
    D3F5E102D5EFA129767634C5A8A8AAAFB13A545859595959591612FF02020202
    D3F5F5E1E4D5F0C5C9A6C4C4B8A8AECA8D7A7C577E7E7E7E7E1612FF02020202
    02D3F1F8E1E4D9F0DDD6CDCDCDD1D08B52737A7C2F7F7F7F7F1613FF02020202
    0202D3E2F8F7F5F9F3EFD7D6D6D08B5259466F797F5B5B5A5A1613FF02020202
    020202D3E1E3F1EDF9F0DEEF8C90E9935DE46F7A5B5D5D5D5D1613FF02020202
    020202022AD3D3D3D3D3D3D374767DC193438E795B5F5F5F5F1613FF02020202
    020202022AFE3232325F31566FD3D58F8ED3B4305D510707070713FF02020202
    020202022AFE6132323232325C7A706D6DB47A32321111101111110202020202
    020202022AFD60606060606060606060606060606012D4ADC28C020202020202
    020202022AFD626262A4626262626262626262626215A2B28E02020202020202
    0202020238FCA4A4A4A462A4A4A4A4A4A4A4A4A46215E28E0202020202020202
    0202020238FCFCFCFCFCFDFDFDFEFEFEFEFE19191915CC020202020202020202
    020202023C3C3C71714343432B2B1C1C1C18181717150202020202020202FFFF
    FFFFFC000003FC000003FC000003E0000003800000031C000003380000031000
    00030000000300000003000000038000000380000003C0000003C0000003A000
    00039000000388000003C4000003C0000003E0000003F0000003F8000003FC00
    0003FC000003FC000007FC00000FFC00001FFC00003FFC00007FFC0000FF}
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnDestroy = FormDestroy
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 562
    Height = 97
    AutoSize = True
    Bands = <
      item
        Control = PanelMainMenu
        ImageIndex = -1
        MinHeight = 22
        Width = 558
      end
      item
        Control = PanelToolBar
        ImageIndex = -1
        MinHeight = 22
        Width = 558
      end
      item
        Control = PanelAddress
        ImageIndex = -1
        MinHeight = 21
        Width = 558
      end
      item
        Control = PanelTab
        ImageIndex = -1
        MinHeight = 22
        Width = 558
      end>
    Color = clBtnFace
    ParentColor = False
    ParentShowHint = False
    ShowHint = True
    object PanelAddress: TPanel
      Left = 9
      Top = 48
      Width = 545
      Height = 21
      BevelOuter = bvNone
      TabOrder = 2
      object PanelGoto: TPanel
        Left = 489
        Top = 0
        Width = 56
        Height = 21
        Align = alRight
        BevelOuter = bvNone
        TabOrder = 0
        object ToolBarGoto: TToolBar
          Left = 0
          Top = 0
          Width = 55
          Height = 22
          Align = alNone
          AutoSize = True
          ButtonWidth = 51
          Caption = 'ToolBarGoto'
          EdgeBorders = []
          Flat = True
          HotImages = ImageList2
          Images = ImageList1
          Indent = 4
          List = True
          ShowCaptions = True
          TabOrder = 0
          object ToolButton16: TToolButton
            Left = 4
            Top = 0
            Action = ActionVisit
          end
        end
      end
      object PanelURL: TPanel
        Left = 0
        Top = 0
        Width = 489
        Height = 21
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 1
        OnResize = PanelURLResize
        object LabelAddress: TLabel
          Left = 4
          Top = 5
          Width = 48
          Height = 12
          Caption = #22320#22336'(&D):'
        end
        object ComboBoxAddress: TIEAddress
          Left = 52
          Top = 0
          Width = 393
          Height = 22
          AutoComplete = acDefault
          AutoSuggest = asDefault
          FileOptions = []
          HasBorder = True
          HasDropDown = True
          IconLeft = 4
          IconTop = 3
          RegistryUpdate = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 0
          OnClick = ComboBoxAddressClick
          OnKeyUp = ComboBoxAddressKeyUp
          Items.Strings = (
            '\\mdmserver'
            'http://www.net.cn')
        end
      end
    end
    object PanelToolBar: TPanel
      Left = 9
      Top = 24
      Width = 545
      Height = 22
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      object ToolBarMain: TToolBar
        Left = 0
        Top = 0
        Width = 377
        Height = 29
        Align = alNone
        EdgeBorders = []
        Flat = True
        HotImages = ImageList2
        Images = ImageList1
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        object ToolButton5: TToolButton
          Left = 0
          Top = 0
          Action = ActionFileOpen
        end
        object ToolButton3: TToolButton
          Left = 23
          Top = 0
          Action = ActionFileSaveAs
        end
        object ToolButton6: TToolButton
          Left = 46
          Top = 0
          Width = 8
          Caption = 'ToolButton6'
          ImageIndex = 19
          Style = tbsSeparator
        end
        object tbBack: TToolButton
          Left = 54
          Top = 0
          Action = ActionBack
          AutoSize = True
          Grouped = True
        end
        object tbForword: TToolButton
          Left = 77
          Top = 0
          Action = ActionForword
          AutoSize = True
          Grouped = True
        end
        object ToolButton8: TToolButton
          Left = 100
          Top = 0
          Action = ActionStop
          AutoSize = True
          Grouped = True
        end
        object ToolButton9: TToolButton
          Left = 123
          Top = 0
          Action = ActionRefresh