www.pudn.com > MSN Messenger µÄÔ´Âë.zip > chatform.dfm

object MSNChatForm: TMSNChatForm 
  Left = 231 
  Top = 102 
  Width = 649 
  Height = 442 
  ActiveControl = Button1 
  Caption = 'MSNChatForm' 
  Color = clBtnFace 
  DefaultMonitor = dmDesktop 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  KeyPreview = True 
  OldCreateOrder = False 
  OnClose = FormClose 
  OnShow = FormShow 
  PixelsPerInch = 96 
  TextHeight = 13 
  object Splitter1: TSplitter 
    Left = 0 
    Top = 330 
    Width = 641 
    Height = 3 
    Cursor = crVSplit 
    Align = alBottom 
  end 
  object Splitter2: TSplitter 
    Left = 0 
    Top = 153 
    Width = 641 
    Height = 3 
    Cursor = crVSplit 
    Align = alTop 
  end 
  object Panel1: TPanel 
    Left = 0 
    Top = 333 
    Width = 641 
    Height = 82 
    Align = alBottom 
    Caption = 'Panel1' 
    TabOrder = 0 
    object Panel2: TPanel 
      Left = 588 
      Top = 1 
      Width = 52 
      Height = 80 
      Align = alRight 
      BevelOuter = bvNone 
      TabOrder = 0 
      object Button1: TButton 
        Left = 8 
        Top = 0 
        Width = 41 
        Height = 17 
        Caption = 'Send' 
        TabOrder = 0 
        OnClick = Button1Click 
      end 
      object Memo3: TMemo 
        Left = 8 
        Top = 56 
        Width = 33 
        Height = 25 
        Lines.Strings = ( 
          'Mem' 
          'o3') 
        TabOrder = 1 
        WordWrap = False 
      end 
      object Button2: TButton 
        Left = 8 
        Top = 16 
        Width = 41 
        Height = 17 
        Hint = 'Immidiate termination of application' 
        Caption = 'Danger' 
        ParentShowHint = False 
        ShowHint = True 
        TabOrder = 2 
        OnClick = Button2Click 
      end 
      object Button3: TButton 
        Left = 8 
        Top = 32 
        Width = 41 
        Height = 17 
        Caption = 'Invite' 
        TabOrder = 3 
        OnClick = Button3Click 
      end 
    end 
    object Memo2: TMemo 
      Left = 1 
      Top = 1 
      Width = 587 
      Height = 80 
      Align = alClient 
      TabOrder = 1 
      OnChange = Memo2Change 
      OnKeyDown = Memo2KeyDown 
      OnKeyUp = Memo2KeyUp 
    end 
  end 
  object RichEdit1: TRichEdit 
    Left = 0 
    Top = 0 
    Width = 641 
    Height = 153 
    Align = alTop 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -11 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    ReadOnly = True 
    ScrollBars = ssBoth 
    TabOrder = 1 
    OnChange = RichEdit1Change 
  end 
  object Memo1: TMemo 
    Left = 0 
    Top = 156 
    Width = 641 
    Height = 174 
    Align = alClient 
    ScrollBars = ssBoth 
    TabOrder = 2 
    WordWrap = False 
  end 
  object chatMSN: TClientSocket 
    Active = False 
    ClientType = ctNonBlocking 
    Host = '64.4.12.180' 
    Port = 1863 
    OnConnect = chatMSNConnect 
    OnDisconnect = chatMSNDisconnect 
    OnRead = chatMSNRead 
    Left = 16 
    Top = 8 
  end 
  object Timer1: TTimer 
    OnTimer = Timer1Timer 
    Left = 48 
    Top = 8 
  end 
end