userinfo.dfm

ICQ客户端源代码

object UserInfoForm: TUserInfoForm
  Left = 307
  Top = 180
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'UserInfoForm'
  ClientHeight = 342
  ClientWidth = 355
  Color = clBtnFace
  Font.Charset = EASTEUROPE_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000080040000000000000000000000000000000000000000
    000080808000FFFFFF00FFF0D4006E6E6E0056565600FFAA2500FFD4D4006262
    6200B97A0000007AB9008ED4FF008EFFFF00B93D000048B8FF000092DC0000B9
    3D00F0CAA6000073000000DC000092929200CECECE009E9E9E0048FF7300C0DC
    C000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000202
    0202020202020202020202020202020202020202020202020202020202020202
    0202020202020202020202020202020202020202020202020202020202020202
    0202020202020202020202020202121212121212121212121010101002020202
    0202020202020202020202020202121212121212121212121010101002020202
    0202040408080808080808080808121213131313171718181313101012120202
    0202040408080808080808080808121213131313171718181313101012120202
    0101111111111111111111111111111112121313141415151616131310100202
    0101111111111111111111111111111112121313141415151616131310100505
    0505050502020202020202020202020207070A0A0F0F0A0A0A0A101002020505
    0505050502020202020202020202020207070A0A0F0F0A0A0A0A101002020202
    0101020202020D0D0D0D0D0D0D0D02020A0A0E0E0E0E0E0E0A0A020202020202
    0101020202020D0D0D0D0D0D0D0D02020A0A0E0E0E0E0E0E0A0A020202020505
    05050505020202020D0D0D0D020202020A0A0E0E0E0E0E0E0A0A020202020505
    05050505020202020D0D0D0D020202020A0A0E0E0E0E0E0E0A0A020202020202
    01010202020202020D0D0D0D020202020A0A0E0E0E0E0E0E0A0A020202020202
    01010202020202020D0D0D0D020202020A0A0E0E0E0E0E0E0A0A020202020505
    050505050202020209090909020202020A0A0B0B0B0B0C0C0A0A020202020505
    050505050202020209090909020202020A0A0B0B0B0B0C0C0A0A020202020202
    0101020202020909090909090202020207070A0A0A0A0A0A0202020202020202
    0101020202020909090909090202020207070A0A0A0A0A0A0202020202020505
    0505050502020202020202020202020207070808020202020202020202020505
    0505050502020202020202020202020207070808020202020202020202020202
    0101020202020202090909090202020207070808020202020202020202020202
    0101020202020202090909090202020207070808020202020202020202020505
    0505050502020202060606060202020207070808020202020202020202020505
    0505050502020202060606060202020207070808020202020202020202020202
    0101020202020202020202020202020203030404020202020202020202020202
    0101020202020202020202020202020203030404020202020202020202020202
    0202010101010101010101010101010101010202020202020202020202020202
    0202010101010101010101010101010101010202020202020202020202020202
    0202020202020202020202020202020202020202020202020202020202020202
    0202020202020202020202020202020202020202020202020202020202020000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 41
    Width = 355
    Height = 2
    Align = alTop
  end
  object lblAnim: TLabel
    Left = 112
    Top = 320
    Width = 129
    Height = 13
    Alignment = taCenter
    AutoSize = False
    Caption = 'Updating'
    Visible = False
  end
  object pgUserInfo: TPageControl
    Left = 8
    Top = 48
    Width = 337
    Height = 257
    ActivePage = tsICQ
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    MultiLine = True
    ParentFont = False
    TabOrder = 0
    object tsICQ: TTabSheet
      Caption = '   ICQ   '
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 22
        Height = 13
        Caption = 'UIN:'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object UINLabel: TLabel
        Left = 128
        Top = 16
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label32: TLabel
        Left = 8
        Top = 40
        Width = 57
        Height = 13
        Caption = 'External IP:'
      end
      object Label33: TLabel
        Left = 8
        Top = 64
        Width = 55
        Height = 13
        Caption = 'Internal IP:'
      end
      object Label34: TLabel
        Left = 8
        Top = 88
        Width = 24
        Height = 13
        Caption = 'Port:'
      end
      object Label35: TLabel
        Left = 8
        Top = 112
        Width = 61
        Height = 13
        Caption = 'ICQ Version:'
      end
      object Label36: TLabel
        Left = 8
        Top = 136
        Width = 95
        Height = 13
        Caption = 'Miranda IM Version:'
      end
      object Label37: TLabel
        Left = 8
        Top = 160
        Width = 61
        Height = 13
        Caption = 'Online since:'
      end
      object ExtIPLabel: TLabel
        Left = 128
        Top = 40
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object IntIPLabel: TLabel
        Left = 128
        Top = 64
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object PortLabel: TLabel
        Left = 128
        Top = 88
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object IcqVerLabel: TLabel
        Left = 128
        Top = 112
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object MiraVerLabel: TLabel
        Left = 128
        Top = 136
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object OnlineSinceLabel: TLabel
        Left = 128
        Top = 160
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label38: TLabel
        Left = 240
        Top = 16
        Width = 24
        Height = 13
        Caption = 'Ping:'
      end
      object lblMyDetailsURL: TLabel
        Left = 8
        Top = 192
        Width = 197
        Height = 13
        Caption = 'Change my details using the ICQ website'
        Enabled = False
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = 13339492
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = [fsUnderline]
        ParentFont = False
        Visible = False
        OnClick = lblMyDetailsURLClick
      end
      object Label39: TLabel
        Left = 240
        Top = 40
        Width = 22
        Height = 13
        Caption = 'Idle:'
      end
      object lbIdle: TLabel
        Left = 264
        Top = 40
        Width = 49
        Height = 13
        Alignment = taCenter
        AutoSize = False
        Caption = '00:00'
      end
      object stPing: TStaticText
        Left = 264
        Top = 16
        Width = 49
        Height = 17
        Alignment = taCenter
        AutoSize = False
        Caption = '<error>'
        Enabled = False
        TabOrder = 0
      end
    end
    object tbSummary: TTabSheet
      Caption = '   Summary   '
      ImageIndex = 4
      object Label17: TLabel
        Left = 8
        Top = 16
        Width = 49
        Height = 13
        Caption = 'Nickname:'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object NickNameLabel: TLabel
        Left = 88
        Top = 16
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label2: TLabel
        Left = 8
        Top = 40
        Width = 54
        Height = 13
        Caption = 'First name:'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object FirstNameLabel: TLabel
        Left = 88
        Top = 40
        Width = 77
        Height = 13
        Caption = '<not specified>'
        Color = clBtnFace