unitmain.dfm

Delphi7版飞信GreenFetion源码

object FormMain: TFormMain
  Left = 256
  Top = 225
  Width = 503
  Height = 334
  Caption = #31616#26131#39134#20449
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object reLogMsg: TRichEdit
    Left = 0
    Top = 0
    Width = 495
    Height = 169
    Align = alClient
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssBoth
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 197
    Width = 495
    Height = 64
    Align = alBottom
    TabOrder = 1
    object mmMsg: TMemo
      Left = 1
      Top = 1
      Width = 493
      Height = 62
      Align = alClient
      ScrollBars = ssVertical
      TabOrder = 0
    end
    object btSendMsg: TBitBtn
      Left = 419
      Top = 1
      Width = 75
      Height = 62
      Caption = #21457#36865
      TabOrder = 1
      OnClick = btSendMsgClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 169
    Width = 495
    Height = 28
    Align = alBottom
    TabOrder = 2
    object Label1: TLabel
      Left = 23
      Top = 8
      Width = 51
      Height = 13
      Caption = #21457#36865#21040#65306' '
    end
    object cbContactList: TComboBox
      Left = 80
      Top = 5
      Width = 145
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 261
    Width = 495
    Height = 39
    Align = alBottom
    TabOrder = 3
    object Image1: TImage
      Left = 320
      Top = 1
      Width = 174
      Height = 37
      Align = alRight
      Picture.Data = {
        0A544A504547496D616765C20C0000FFD8FFE000104A46494600010101006000
        600000FFE1004645786966000049492A00080000000200310102001000000026
        000000010305000100000036000000000000005061696E742E4E45542076332E
        323200A08601008FB10000FFDB004300080606070605080707070909080A0C14
        0D0C0B0B0C1912130F141D1A1F1E1D1A1C1C20242E2720222C231C1C2837292C
        30313434341F27393D38323C2E333432FFDB0043010909090C0B0C180D0D1832
        211C213232323232323232323232323232323232323232323232323232323232
        323232323232323232323232323232323232323232FFC0001108003200C70301
        2200021101031101FFC4001F0000010501010101010100000000000000000102
        030405060708090A0BFFC400B5100002010303020403050504040000017D0102
        0300041105122131410613516107227114328191A1082342B1C11552D1F02433
        627282090A161718191A25262728292A3435363738393A434445464748494A53
        5455565758595A636465666768696A737475767778797A838485868788898A92
        939495969798999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7B8B9BAC2C3C4C5C6C7
        C8C9CAD2D3D4D5D6D7D8D9DAE1E2E3E4E5E6E7E8E9EAF1F2F3F4F5F6F7F8F9FA
        FFC4001F0100030101010101010101010000000000000102030405060708090A
        0BFFC400B5110002010204040304070504040001027700010203110405213106
        1241510761711322328108144291A1B1C109233352F0156272D10A162434E125
        F11718191A262728292A35363738393A434445464748494A535455565758595A
        636465666768696A737475767778797A82838485868788898A92939495969798
        999AA2A3A4A5A6A7A8A9AAB2B3B4B5B6B7B8B9BAC2C3C4C5C6C7C8C9CAD2D3D4
        D5D6D7D8D9DAE2E3E4E5E6E7E8E9EAF2F3F4F5F6F7F8F9FAFFDA000C03010002
        110311003F00F23F05782B53F1CEB834DD382A055DF34EFF007224F53FD077AF
        615FD9A610A37789C93FF5E1FF00DB293F66951F67F11B606736DCFF00DFDAF6
        0F156B371A16833DEDADA4975328F96341C939C7E5CF3ED49BB6A38C5C9A48F1
        D97F670B3810B4BE2C58D4752F6581FF00A36AAAFC03D0DD82A78EAD198F4020
        524FFE45AC5D77C51AA7880896F6F64186E605CAA8F43FFD63DF1EBC60EE4400
        444A647CC4363273EDF9571CB1893D11F4D4B866ACA1CD39A4FB6FF89E88BFB3
        65B38CA78A770F51639FFDAB4BFF000CD307FD0CE7FF00003FFB6D739A0FC40D
        6B40995A3B933C19F9A390E72323A1EDC57D01E16F1458F8A74B4BBB47F9BA3A
        1E0A9EE2B7A55A35363C7C6E5D5B06FF0079B775B1E45FF0CD307FD0CE7FF003
        FF00B6D1FF000CD307FD0CE7FF00003FFB6D7BD573F7FE2192D3567B54580AC6
        D1AB2331F3242D8FBBDB8CF7AD8E03C97FE19A60FF00A19CFF00E007FF006DA3
        FE19A60FFA19CFFE007FF6DAF623AC4BF67693CB4C8BFF00B2E39FBBBF6E7EB4
        596B12DD5DC10B46804866C919E3636050078EFF00C334C1FF004339FF00C00F
        FEDB47FC334C1FF4339FFC00FF00EDB5EC7657BA9CDAA4D6B3C766120DA64285
        B243024633F4A9A6D4648AFAEE008A561B5F3C13D49C9E3F4A00F16FF866983F
        E8673FF801FF00DB68FF00866983FE8673FF00801FFDB6BD7E6D6E68ED6D6511
        2133593DC91CF05541C7D39A43A8EA8D79690C71D9EDB98CC8858B64000139FC
        E803C87FE19A60FF00A19CFF00E007FF006DA3FE19A60FFA19CFFE007FF6DAF5
        B4F11A3F951E61FB4BDE790D16790BB88DD8ADFA00F05FF866983FE8673FF801
        FF00DB68FF00866983FE8673FF00801FFDB6BDEA8A00F05FF866983FE8673FF8
        01FF00DB697FE19A60FF00A19CFF00E007FF006DAF79A2803C1BFE19A60FFA19
        CFFE007FF6DA3FE19A60FF00A19CFF00E007FF006DAF79A2803C1BFE19A60FFA
        19CFFE007FF6DA8E6FD9A53CA6F27C4C0C98F943591009F73E61C7E55EFB4500
        7C2DE24F0EEA1E15D72E349D4E2D97109EA0E5581E8CA7B8228AF4FF00DA3954
        78DF4F60064E9C993FF6D25A2803A1FD9A7FE3D7C45F5B6FFDAB5EF0C8AEA559
        4303D88AF07FD9A7FE3D7C45F5B6FF00DAB5EF3401E77E39F0169173673EA914
        4B0DD20CF070ADEC474AA1A2E8F696B6CADFD830CA08C912A8247E86B73C45AA
        C971797021F29ADB4D512CE924814B7B0CF538C9FC3DC541078BA1963531A614
        8E3231FA578199D47CE94345DFB9E950955952E46EEBB5F638EF1778474DD4ED
        5E7D3ED16C6FD06EF2D7EE49C74F63F95729F0AB5E9F47F1BA599CF97780C6E8
        DD99727F966BD3752BA1728F32E07CB918F5AF25F0BA9BEF8D0AD6A9BD12F267
        257B0F9867F323F3AD32D9CA5A3E87554A8FD84A9CDDD58FA9EB99D42D6C2E2F
        AEFCCD6EDA28E76513424A6E054018C939078F4AE9ABE77F0A780F44F1C7C4BF
        1F26B51CEE2D351731795294C6E965CE7D7EE8AF6CF0CF6F5D184970254BD2D6
        6D71F6A1085072F9CE777A679C5579EC6DAC1A1FF89C4569731B48CAD26DE55C
        E48DA4FEB5E53A7A5D7C25F89E3C3B637B3DCE85A9D949710C370DBBCA902B91
        F8EE4C646321867245715E11B5F87BAF69D73AA78EFC4378BADDC5CBB30DCFCA
        E060E421E49CF7F4E2803E96B37B4B79E4BC7D4EDE5374238C36E50199060E39
        E49CF41D29F7FA4BDDDCB4F05DB5BB49179328081B7264F4CF43C9E6BC3FC75A
        3E8BA2697F0EEDFC3F2C92E992EA46786491892C1DA339E40FE55EFB7939B5B2
        B8B80BB8C51B3E3D7033401CEDCDBE9DA7116DA9EBF6D1B1B76B7B549DD232AA
        C319C12371E00AD4920B5B496C2EA7BC8A34B788C4A5C850F903B93FECD787FC
        39F01E91F11340D5BC53E2DB8B9B9BDB8BA913CDF3CA0842A83B876EFD0F0001
        C570BA8EA57971F09DB4E96E5EEAC74ED7D62B39DBBA18A4381EDC038EDBA803
        EA5934BB6B4B48CCF751C4B15DFDA4CAE028FBC4EDC93EF8AD27BCB58CC41EE6
        15337FAACB81BFE9EBD474AF12F8B3F12FC21E24F87D79A6691AC0B9BC925899
        6316F2AE40704F2CA074F7AAFE2B00EAFF00060119045BE41FADBD007BDAB065
        0CA41046411DE969A889146B1C68A88A0055518000EC053A800A28A2800A28A2
        800A28A2803E66FDA3FF00E475D3BFEC1C9FFA325A28FDA3FF00E475D3BFEC1C
        9FFA325A2803A0FD9A7FE3D7C45F5B6FFDAB5EF04E013E95F22FC24F8891F80F
        5BB85BE8DDF4DBE5559F60CB215276B01DF1B9B23DEBE805F8C9E0175C8D7860
        8FF9F49FFF0088A00E1FC537705E78AEF27582E24504467C8B732ED2B9CE76E7
        07E6EF83541664429892480B9C22DCC66124E71C06F7C7E62BD0D7E2CFC3A424
        AEB31827AFFA1CDFFC454179F133E19EA10B4573AAC32230C106CA6FFE22BCFA
        B97C6A37272D59DB4F1B282514B4385D4353BCB7D3E78EDD5A6B831B08521F9C
        993692BD3D319FC31DEAC7C12F0E2697E7F88759905A492B341025CBF97D0F3C
        3639C83F97B9AE8B4DF19FC25D26E4DC595FC114A7396165377EBFF2CEAE6A7F
        123E1A6AD64D6973ACA988E7816737704778FDEB5C2E15508DAF722BE25D5D12
        B23D255D58B0560769C1C1E87D2BE75F0F78E2D7C05F123C752EA1A66A572B7B
        A8C82236B106C6D964CE7247F7874AF41D1BE247C36D06CDAD6CB5F7F2DA4321
        F3209DCEE2003C94F6AD1FF85C5E02FF00A0F8FF00C049FF00F88AEB394E2345
        D3F59F89FF00110F8B2F34C9F4BD1ECACDEDAC96E548695995C038EFCBB31238
        E00E6B8FF0BEA7A1F81EC6E743F1978024BDD4A2B872276B3490B271800B751C
        1C1190735ECFFF000B8BC05FF41F1FF8093FFF001147FC2E2F017FD07C7FE024
        FF00FC450079FF008E2793C57E05F0C789FC37A15CC765A35F1CD80880748D4A
        E0855CE17E4038E99AE8AC3E3369DE259DB468742D56DE6BA8655124A8BB1484
        63CE0E7B56F7FC2E2F017FD07C7FE024FF00FC451FF0B8BC05FF0041F1FF0080
        93FF00F11401E51F0BBE12695E2FF0936A3AADEEAD6F20BA788C1048A88CA029
        C90CA4F7ADDF8D5E19B0F0F7C33D1B49D12C8C76D16A4A76A02CCC4C6F9663D4
        93EB5DD7FC2E2F017FD07C7FE024FF00FC451FF0B8BC05FF0041F1FF008093FF
        00F11401CE7C64F09E8561F0DAFAE34CF0FE9D6F74B2C2164B6B344700B8CE0A
        8CF4AC3F14C12B6AFF0006C889C84FB3EFC29F979B7EBE95DFFF00C2E2F017FD
        07C7FE024FFF00C451FF000B8BC05FF41F1FF8093FFF0011401DCD15C37FC2E2
        F017FD07C7FE024FFF00C451FF000B8BC05FF41F1FF8093FFF0011401DCD15C3
        7FC2E2F017FD07C7FE024FFF00C451FF000B8BC05FF41F1FF8093FFF0011401D
        CD15C37FC2E2F017FD07C7FE024FFF00C451FF000B8BC05FF41F1FF8093FFF00
        11401DCD15C37FC2E2F017FD07C7FE024FFF00C454737C67F0143133FF006E17
        2A32156D66CB7B0CA01F99A00F23FDA3FF00E475D3BFEC1C9FFA325A2B87F88F
        E357F1D78AE4D4C4461B64410DBC6DD56304919F72493F8D1401C8D145140051
        4514005145140051451400514514005145140051451400514514005145140051
        451400514514005145140051451401FFD9}
      Stretch = True
    end
    object Label2: TLabel
      Left = 23
      Top = 16
      Width = 73
      Height = 13
      AutoSize = False
      Caption = #20851#20110'...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsUnderline]
      ParentFont = False
      OnClick = Label2Click
    end
  end
  object IdTCPClient1: TIdTCPClient
    MaxLineAction = maException
    ReadTimeout = 5000
    Port = 0
    Left = 368
    Top = 16
  end
  object tmRegister: TTimer
    Enabled = False
    Interval = 60000
    OnTimer = tmRegisterTimer
    Left = 400
    Top = 16
  end
  object IdHTTP1: TIdHTTP
    MaxLineAction = maException
    AllowCookies = True
    ProxyParams.BasicAuthentication = False
    ProxyParams.ProxyPort = 0
    Request.ContentLength = -1
    Request.ContentRangeEnd = 0
    Request.ContentRangeStart = 0
    Request.Accept = 'text/html, */*'
    Request.BasicAuthentication = False
    Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
    HTTPOptions = []
    Left = 304
    Top = 16
  end
end