main.dfm

精彩编程百例75～100 其中有媒体播放器 SQL语言编辑器 ADO方法连接多个数据库 用户密码验证系统 获取Man地址 信史服务 ping命令等待

object Form1: TForm1
  Left = 266
  Top = 176
  Width = 544
  Height = 375
  Caption = 'about:blank'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object WebBrowser1: TWebBrowser
    Left = 0
    Top = 57
    Width = 536
    Height = 265
    Align = alClient
    TabOrder = 0
    OnDownloadBegin = WebBrowser1DownloadBegin
    OnDownloadComplete = WebBrowser1DownloadComplete
    ControlData = {
      4C00000066370000631B00000000000000000000000000000000000000000000
      000000004C000000000000000000000001000000E0D057007335CF11AE690800
      2B2E126208000000000000004C0000000114020000000000C000000000000046
      8000000000000000000000000000000000000000000000000000000000000000
      00000000000000000100000000000000000000000000000000000000}
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 536
    Height = 25
    ButtonWidth = 51
    Caption = 'ToolBar1'
    Flat = True
    Images = ImageList1
    List = True
    ShowCaptions = True
    TabOrder = 1
    object ToolButton1: TToolButton
      Left = 0
      Top = 0
      Caption = #21518#36864
      ImageIndex = 0
      OnClick = ToolButton1Click
    end
    object ToolButton2: TToolButton
      Left = 51
      Top = 0
      Caption = #21069#36827
      ImageIndex = 1
      OnClick = ToolButton2Click
    end
    object ToolButton3: TToolButton
      Left = 102
      Top = 0
      Width = 10
      ImageIndex = 5
      ParentShowHint = False
      ShowHint = False
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 112
      Top = 0
      Caption = #20572#27490
      ImageIndex = 2
      OnClick = ToolButton4Click
    end
    object ToolButton5: TToolButton
      Left = 163
      Top = 0
      Caption = #21047#26032
      ImageIndex = 3
      OnClick = ToolButton5Click
    end
    object ToolButton6: TToolButton
      Left = 214
      Top = 0
      Caption = #20027#39029
      ImageIndex = 4
      OnClick = ToolButton6Click
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 25
    Width = 536
    Height = 32
    Align = alTop
    TabOrder = 2
    object Label1: TLabel
      Left = 16
      Top = 8
      Width = 36
      Height = 13
      Caption = #22320#22336#65306
    end
    object Edit1: TEdit
      Left = 56
      Top = 5
      Width = 217
      Height = 21
      TabOrder = 0
      OnEnter = BitBtn1Click
    end
    object BitBtn1: TBitBtn
      Left = 296
      Top = 8
      Width = 73
      Height = 21
      Cursor = crIBeam
      Caption = #36716#21040
      Default = True
      TabOrder = 1
      OnClick = BitBtn1Click
      OnEnter = BitBtn1Click
      Glyph.Data = {
        9E050000424D9E05000000000000360400002800000013000000120000000100
        0800000000006801000000000000000000000001000000000000000000000101
        0100020202000303030004040400050505000606060007070700080808000909
        09000A0A0A000B0B0B000C0C0C000D0D0D000E0E0E000F0F0F00101010001111
        1100121212001313130014141400151515001616160017171700181818001919
        19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
        2100222222002323230024242400252525002626260027272700282828002929
        29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
        3100323232003333330034343400353535003636360037373700383838003939
        39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
        4100424242004343430044444400454545004646460047474700484848004949
        49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
        5100525252005353530054545400555555005656560057575700585858005959
        59005A5A5A005B5B5B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
        6100626262006363630064646400656565006666660067676700686868006969
        69006A6A6A006B6B6B006C6C6C006D6D6D006E6E6E006F6F6F00707070007171
        7100727272007373730074747400757575007676760077777700787878007979
        79007A7A7A007B7B7B007C7C7C007D7D7D007E7E7E007F7F7F00808080008181
        8100828282008383830084848400858585008686860087878700888888008989
        89008A8A8A008B8B8B008C8C8C008D8D8D008E8E8E008F8F8F00909090009191
        9100929292009393930094949400959595009696960097979700989898009999
        99009A9A9A009B9B9B009C9C9C009D9D9D009E9E9E009F9F9F00A0A0A000A1A1
        A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
        A900AAAAAA00ABABAB00ACACAC00ADADAD00AEAEAE00AFAFAF00B0B0B000B1B1
        B100B2B2B200B3B3B300B4B4B400B5B5B500B6B6B600B7B7B700B8B8B800B9B9
        B900BABABA00BBBBBB00BCBCBC00BDBDBD00BEBEBE00BFBFBF00C0C0C000C1C1
        C100C2C2C200C3C3C300C4C4C400C5C5C500C6C6C600C7C7C700C8C8C800C9C9
        C900CACACA00CBCBCB00CCCCCC00CDCDCD00CECECE00CFCFCF00D0D0D000D1D1
        D100D2D2D200D3D3D300D4D4D400D5D5D500D6D6D600D7D7D700D8D8D800D9D9
        D900DADADA00DBDBDB00DCDCDC00DDDDDD00DEDEDE00DFDFDF00E0E0E000E1E1
        E100E2E2E200E3E3E300E4E4E400E5E5E500E6E6E600E7E7E700E8E8E800E9E9
        E900EAEAEA00EBEBEB00ECECEC00EDEDED00EEEEEE00EFEFEF00F0F0F000F1F1
        F100F2F2F200F3F3F300F4F4F400F5F5F500F6F6F600F7F7F700F8F8F800F9F9
        F900FAFAFA00FBFBFB00FCFCFC00FDFDFD00FEFEFE00FFFFFF00D4DFF3EAEAEA
        E9E8EAEBEAE9E7E7E9E9F3E3D5FFE1F1A4454A4C4C4C4E545554514B493F8CF0
        E100F6DC4A5D62666766665C636763635F5A35C4F200F7DD4F6C707575737497
        7E68706D6A6637C0F400F7DE5673777C7E7497FFDA7272736E6C3BC3F500F7DE
        5A7A7D82827E8BDBFFD87276736F3EC3F500F6DF607F828786877E84E2FFD86D
        747041C3F400F4DF6585817F7F7C7D7678DCFFD3667445C4F300F4DF697AC7F0
        ECEEEEF1E9F6F9FFCF6749C4F200F4DF6979CFFCF8FAFAFCF8FAF9FFDA6749C3
        F200F3DF6A8987868381817B75DAFFDC677448C3F200F5E173908E8C87877F7B
        D8FFE26C6F7348C4F500F4E584A49C948D8789D4FFE3777271724BC5F500F5E5
        89AEA3999587A6FFE6847979737549C6F600F4E694BBAFA19C9693BA9B7E857E
        797546C4F600F3E899BFB5A6A09C988F8F8F88867E7545C5F500E7F2C1928D82
        7D787A7D786F6D6B64548DEEE800E3E9F3EFEEEDECEBEDEDECEBEBEBEAEAF3ED
        E300}
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 322
    Width = 536
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object ImageList1: TImageList
    Left = 392
    Top = 24
    Bitmap = {
      494C010105000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000003000000001002000000000000030
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000