mainunt.dfm

絮语2007视频聊天软件源程序.仅供参考

        641BA95719A95719C77020000000000000000000000000000000000000000000
        000000000000000000000000A65618F6AF63CF7020FDC791BD68240000000000
        00000000FFFAF2000000000000000000000000000000000000AE5C1CF5A654F9
        BF86D36C14FCCEA2C77635000000000000FFFAF2FFFAF2000000000000000000
        000000000000AE5D1CF9B269F9B66FFCD2A5D66909FEDBBBD186410000000000
        00FFFAF2000000000000D67E2BB5611FA85719A85719F8B979F9BD83FAC58BFC
        DAB5DA6902FFEAD7E1893BBD6D29000000000000000000000000B6662AF7BB82
        FBC58DF18B30FDCB95FED2A1FFD9B4FFEAD4DD710DFFF5E4E79851F6D7B8BF6E
        2B000000000000000000BB6D31FFDBB9FFDAB6F59D4FFFDAB5FFF3E1FFFCF2FF
        F9F1E98728FFFFFFE79B59FBF1E9CD7C33000000FFFAF2FFFAF2C67E48FFFFFF
        FFFFFFFBC28EFFFFFFFFFFFFFFFFFFFFFFFFEB9440FFFFFFE79B59FEFFFFD683
        38000000FFFAF2FFFAF2DE863DFEEFE2FFFFFFFFDCBDFFFFFFFFFFFFFFFFFFFF
        FFFFF4AA57FFFFFFE7954CFDF8F3DE8A3D000000000000000000E69B4CE68938
        E18636E18739FFF4E2FFFFFFFFFFFFFFFFFFF7B568FFFFFCE49145E38F400000
        00000000000000000000000000000000000000000000E28736FFFDF6FFFFFFFF
        FFFFF6BB79FFFBF6E49247000000000000FFFAF2000000000000000000000000
        000000000000000000E28736FFFDF5FFFEF8F9C683FFF9F1E491460000000000
        00FFFAF2FFFAF2000000000000000000000000000000000000000000E38737FF
        FCF4F9CA94FFEEDDE69348000000000000000000FFFAF2000000000000000000
        000000000000000000000000000000E59045E48838E68939EDA04C0000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = btn_msgClick
    end
    object btn_share: TSpeedButton
      Left = 104
      Top = 1
      Width = 23
      Height = 22
      Cursor = crHandPoint
      Flat = True
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        1800000000000003000000000000000000000000000000000000000000000000
        000000000000F4C18EDD8732DE7E1FD0761CDE7E1FF0973FF4BB810000000000
        00000000000000000000000000000000F8DEC5D97D23EC8721F28C27F5902BF6
        922DF5912CF28D28DB7C1DDA7E23F5CEA8000000000000000000000000F7DDC4
        CB6D10E07C1AF08924F5902BFA9631FC9934FB9732EB8827C96C139684165E88
        0FE2C0A1000000000000000000D2761BAD730F27B01AC39827F6912CFC9834FF
        9E38FD9935A7A42E00D13300CF2C00CB236E8C1D000000000000EFC193DF760F
        6E851100CE2C4DBD32F5902BFA9631FD9935FB9732D6982E0AD94505D63D00D2
        3444A41CEAB077000000DF8936DA720D5E981C04D53B0CD947F28D28F5912CF7
        922DF6912CF38E28C5982B60BA3A23CD3DA57E16D07822000000B96804967F10
        24BD300CDA4815E0569CA93AF08A25D78725D0761BE88320E7821CE57E19D47F
        16CE6D0ECB6808000000518E1000D13209D84313DF531EE5644DD765C87A2368
        AF434E71A10E60C2BC8625E27B15DE750FCD6B0BBB610A0000003B7272055EDC
        0EDB4C1EE36040D25F57B444176CC50A59C9469EF65DB5FA075BD2C76C13CD6B
        0BCA6808BE62070000003D9BF37AD1FF0563DC5FC055085FD10663DC439CF67A
        D1FF0A5CC971CBFF71CAFF075BD2C1650BC76504D37620000000248CEF86D8FF
        86D8FF0964D063B8FA86D8FF0669DB85D9FF86D8FF0271EA86D8FF86D8FF0963
        D0C46004E1A5700000000000000379E992E1FF92E0FF037AE992E1FF92E0FF03
        7AE992E0FF92E1FF6ECCF992E1FF52BCF40669DB936B53B3AEB1000000EBD3BF
        0481E99EE8FF9EE8FF0482E99DE8FF9EE8FF76D2F99DE8FF9EE8FF9DE8FF9EE8
        FF4C92B9E8C6A3876958000000000000F0D5BF0488E8A7EFFFA7EFFF7DD7F9A7
        EFFFA7EFFFA7EEFFA8EEFFA7EFFF88DDFA9CBAC8F8EDE39B8071000000000000
        000000000000048FE749B8F181D9F8AEF3FFAEF3FFAEF3FFAEF3FF82DAF967B5
        DEFFFFFFE1D8D4A78D7F0000000000000000000000000000008DCEF430A6EB05
        93E70593E70593E70593E75390B57E8F99A88F83B9A79F000000}
      ParentShowHint = False
      ShowHint = True
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 132
    Height = 36
    Align = alTop
    BevelOuter = bvNone
    Color = clWhite
    TabOrder = 2
    OnDblClick = Panel1DblClick
    object Label1: TLabel
      Left = 41
      Top = 11
      Width = 36
      Height = 12
      Cursor = crHandPoint
      Caption = 'Label1'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnClick = Label1Click
    end
    object myicon: TImage
      Left = 0
      Top = 0
      Width = 36
      Height = 36
      Cursor = crHandPoint
      Center = True
      Stretch = True
      Transparent = True
      OnClick = N34Click
    end
  end
  object userbar_left_popup: TPopupMenu
    OnPopup = userbar_left_popupPopup
    Left = 72
    Top = 96
    object userbar_userid: TMenuItem
      Caption = '发送文本消息'
      OnClick = userbar_useridClick
    end
    object Windows1: TMenuItem
      Caption = '发送Windows信使消息'
      OnClick = Windows1Click
    end
    object N63: TMenuItem
      Caption = '发送多个文件'
      OnClick = N63Click
    end
    object N48: TMenuItem
      Caption = '带目录的文件传送'
      OnClick = N48Click
    end
    object N14: TMenuItem
      Caption = '-'
    end
    object N64: TMenuItem
      Caption = '语音视频'
      OnClick = N64Click
    end
    object N20: TMenuItem
      Caption = '远程协助'
      OnClick = N20Click
    end
    object N28: TMenuItem
      Caption = '定时消息队列'
      OnClick = N37Click
    end
    object N27: TMenuItem
      Caption = '邀请加入游戏'
    end
    object N31: TMenuItem
      Caption = '-'
    end
    object N40: TMenuItem
      Caption = '加为好友'
      OnClick = N40Click
    end
    object N53: TMenuItem
      Caption = '列入黑名单'
      OnClick = N53Click
    end
    object N7: TMenuItem
      Caption = '删除用户'
      OnClick = N7Click
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N9: TMenuItem
      Caption = '好友资料'
      OnClick = N9Click
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 500
    OnTimer = Timer1Timer
    Left = 6
    Top = 95
  end
  object status_popup: TPopupMenu
    Alignment = paRight
    TrackButton = tbLeftButton
    OnPopup = status_popupPopup
    Left = 72
    Top = 64
    object online: TMenuItem
      Caption = '上线'
      Checked = True
      GroupIndex = 1
      ImageIndex = 2
      OnClick = onlineClick
    end
    object outline: TMenuItem
      Caption = '离开'
      GroupIndex = 1
      ImageIndex = 4
    end
    object hideline: TMenuItem
      Caption = '隐身'
      GroupIndex = 1
      ImageIndex = 3
      OnClick = onlineClick
    end
    object N25: TMenuItem
      Caption = '-'
      GroupIndex = 1
    end
    object downline: TMenuItem
      Caption = '下线'
      GroupIndex = 1
      ImageIndex = 5
      OnClick = onlineClick
    end
  end
  object userbar_right_popup: TPopupMenu
    OnPopup = userbar_right_popupPopup
    Left = 38
    Top = 95
    object N41: TMenuItem
      Caption = '刷新列表'
      OnClick = N41Click
    end
    object N39: TMenuItem
      Caption = '-'
    end
    object N35: TMenuItem
      Caption = '显示自己'
      OnClick = N35Click
    end
    object N38: TMenuItem
      Caption = '显示上下线提示'
      OnClick = N38Click
    end
    object N59: TMenuItem
      Caption = '只显示在线好友'
      OnClick = N59Click
    end
    object N12: TMenuItem
      Caption = '-'
    end
    object N18: TMenuItem
      Caption = '文件群发'
      OnClick = N18Click