PC World 2001 July/PCWorld_2001-07_cd.bin/Software/Vyzkuste/quickchat/quickchat.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 2001-03-14 | 10KB | 334 lines

object Form1: TForm1
  Left = 340
  Top = 346
  Width = 523
  Height = 337
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'verdana'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object RichEdit1: TRichEdit
    Left = 0
    Top = 66
    Width = 480
    Height = 211
    Align = alClient
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 277
    Width = 515
    Height = 33
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object Label2: TLabel
      Left = 7
      Top = 10
      Width = 54
      Height = 13
      Caption = 'Message:'
    end
    object Edit2: TEdit
      Left = 68
      Top = 8
      Width = 390
      Height = 21
      TabOrder = 0
    end
    object Button1: TButton
      Left = 463
      Top = 6
      Width = 48
      Height = 25
      Caption = 'Ok'
      Default = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'verdana'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 515
    Height = 35
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 2
    object Label1: TLabel
      Left = 4
      Top = 9
      Width = 21
      Height = 13
      Caption = 'I.P:'
    end
    object Edit1: TEdit
      Left = 32
      Top = 6
      Width = 338
      Height = 21
      TabOrder = 0
    end
    object Panel3: TPanel
      Left = 374
      Top = 0
      Width = 141
      Height = 35
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 1
      object SpeedButton1: TSpeedButton
        Left = 0
        Top = 5
        Width = 67
        Height = 25
        Caption = 'Create'
        Flat = True
        OnClick = SpeedButton1Click
      end
      object SpeedButton2: TSpeedButton
        Left = 69
        Top = 5
        Width = 67
        Height = 25
        Caption = 'Join'
        Flat = True
        OnClick = SpeedButton2Click
      end
    end
  end
  object Panel4: TPanel
    Left = 480
    Top = 66
    Width = 35
    Height = 211
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 3
    object SpeedButton3: TSpeedButton
      Left = 5
      Top = 3
      Width = 25
      Height = 25
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 5
      Top = 30
      Width = 25
      Height = 25
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
        00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
        00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
        00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
        00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
        00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
        00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
        0003737FFFFFFFFF7F7330099999999900333777777777777733}
      NumGlyphs = 2
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton
      Left = 5
      Top = 55
      Width = 25
      Height = 25
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
      OnClick = SpeedButton5Click
    end
    object SpeedButton7: TSpeedButton
      Left = 4
      Top = 112
      Width = 25
      Height = 25
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
        33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
        FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
        FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
        FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
        FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
        FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
        3333333773FFFF77333333333FBFBF3333333333377777333333}
      NumGlyphs = 2
      OnClick = SpeedButton7Click
    end
    object SpeedButton6: TSpeedButton
      Left = 5
      Top = 80
      Width = 25
      Height = 25
      Flat = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000C40E0000C40E00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        6333333333333333663333333333333366333333333333336663333333333333
        6663666666333666666666666663336666666666663336666666666666633366
        6666666666333666666666666663336666663333333333336663333333333333
        6663333333333333663333333333333366333333333333336333}
      OnClick = SpeedButton6Click
    end
  end
  object Edit3: TEdit
    Left = 181
    Top = 76
    Width = 121
    Height = 21
    TabOrder = 4
    Text = 'Edit3'
    Visible = False
  end
  object Panel5: TPanel
    Left = 0
    Top = 35
    Width = 515
    Height = 31
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 5
    object Label3: TLabel
      Left = 4
      Top = 5
      Width = 112
      Height = 13
      Caption = 'Your Screen Name:'
    end
    object ProUrlLabel1: TProUrlLabel
      Left = 375
      Top = 8
      Width = 137
      Height = 13
      Caption = 'Our Website. Click Here'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'verdana'
      Font.Style = []
      ParentFont = False
      URL = 'http://gunsoft.cjb.net'
      CanHover = True
    end
    object Edit4: TEdit
      Left = 119
      Top = 3
      Width = 251
      Height = 21
      TabOrder = 0
    end
  end
  object host: TSimpleTCPServer
    Listen = False
    LocalHostName = 'steve'
    LocalIP = '127.0.0.1'
    OnClientConnected = hostClientConnected
    OnClientDisconnected = hostClientDisconnected
    OnClientRead = hostClientRead
    AllowChangeHostAndPortOnConnection = False
    Port = 1234
    Left = 19
    Top = 102
  end
  object client: TSimpleTCPClient
    Connected = False
    OnConnected = clientConnected
    OnDisconnected = clientDisconnected
    OnRead = clientRead
    AllowChangeHostAndPortOnConnection = False
    Port = 1234
    Left = 55
    Top = 88
  end
  object RxGradientCaption1: TRxGradientCaption
    Captions = <
      item
        Caption = 'Gunsoft'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'verdana'
        Font.Style = [fsBold]
        ParentFont = False
      end
      item
        Caption = ' QuickChat!'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clCaptionText
        Font.Height = -11
        Font.Name = 'verdana'
        Font.Style = []
        ParentFont = False
      end>
    Left = 90
    Top = 103
  end
  object save: TSaveDialog
    DefaultExt = '*.rtf'
    Filter = 'RTF Files|*.rtf'
    Title = 'Save your chat session'
    Left = 163
    Top = 104
  end
  object open: TOpenDialog
    DefaultExt = '*.rtf'
    Filter = 'Chats|*.rtf'
    Title = 'Find a Chat session'
    Left = 250
    Top = 214
  end
end