lazarus-ccr/applications/fpchess/mainform.lfm

object formChess: TformChess
  Left = 181
  Height = 433
  Top = 209
  Width = 360
  Caption = 'FP Chess 0.1'
  ClientHeight = 433
  ClientWidth = 360
  OnCreate = FormCreate
  LCLVersion = '0.9.29'
  object notebookMain: TUntabbedNotebook
    Left = 0
    Height = 433
    Top = 0
    Width = 360
    PageIndex = 4
    Align = alClient
    TabOrder = 0
    TabStop = True
    object pageStart: TUNBPage
      OnBeforeShow = pageBeforeShow
      ClientWidth = 360
      ClientHeight = 433
      object Label1: TLabel
        Left = 0
        Height = 32
        Top = 8
        Width = 360
        Alignment = taCenter
        AutoSize = False
        Caption = 'Welcome to FP Chess 0.1'
        Font.Height = -19
        ParentColor = False
        ParentFont = False
      end
      object Label2: TLabel
        Left = 8
        Height = 30
        Top = 40
        Width = 352
        AutoSize = False
        Caption = 'Please choose what kind of game you would like to play:'
        ParentColor = False
        WordWrap = True
      end
      object btnSinglePlayer: TBitBtn
        Left = 64
        Height = 30
        Top = 200
        Width = 224
        Caption = 'Play Against the Computer'
        Enabled = False
        OnClick = HandleMainScreenButton
        TabOrder = 0
      end
      object btnDirectComm: TBitBtn
        Left = 64
        Height = 30
        Top = 288
        Width = 224
        Caption = 'Play with a friend through a direct connection'
        Enabled = False
        OnClick = HandleMainScreenButton
        TabOrder = 1
      end
      object BitBtn3: TBitBtn
        Left = 62
        Height = 30
        Top = 376
        Width = 224
        Caption = 'Quit'
        TabOrder = 2
      end
      object editPlayerName: TLabeledEdit
        Left = 88
        Height = 21
        Top = 72
        Width = 120
        EditLabel.AnchorSideLeft.Control = editPlayerName
        EditLabel.AnchorSideTop.Control = editPlayerName
        EditLabel.AnchorSideTop.Side = asrCenter
        EditLabel.AnchorSideRight.Control = editPlayerName
        EditLabel.AnchorSideBottom.Control = editPlayerName
        EditLabel.Left = 24
        EditLabel.Height = 14
        EditLabel.Top = 75
        EditLabel.Width = 61
        EditLabel.Caption = 'Player Name'
        EditLabel.ParentColor = False
        LabelPosition = lpLeft
        TabOrder = 3
      end
      object Label6: TLabel
        Left = 28
        Height = 14
        Top = 104
        Width = 43
        Caption = 'Start as:'
        ParentColor = False
      end
      object comboStartColor: TComboBox
        Left = 88
        Height = 21
        Top = 104
        Width = 120
        ItemHeight = 13
        ItemIndex = 0
        Items.Strings = (
          'White'
          'Black'
        )
        TabOrder = 4
        Text = 'White'
      end
      object checkTimer: TCheckBox
        Left = 24
        Height = 17
        Top = 136
        Width = 163
        Caption = 'Set a time limit for each Player'
        Checked = True
        State = cbChecked
        TabOrder = 5
      end
      object spinPlayerTime: TSpinEdit
        Left = 21
        Height = 21
        Top = 160
        Width = 50
        TabOrder = 6
        Value = 30
      end
      object Label7: TLabel
        Left = 80
        Height = 14
        Top = 163
        Width = 114
        Caption = 'minutes for each player'
        ParentColor = False
      end
      object btnHotSeat: TBitBtn
        Left = 64
        Height = 30
        Top = 240
        Width = 224
        Caption = 'Play with a friend in the same Computer'
        OnClick = HandleMainScreenButton
        TabOrder = 7
      end
      object btnWebservice: TBitBtn
        Left = 64
        Height = 30
        Top = 328
        Width = 224
        Caption = 'Play with a friend through the chess Webservice'
        OnClick = HandleMainScreenButton
        TabOrder = 8
      end
    end
    object pageConfigConnection: TUNBPage
      OnBeforeShow = pageBeforeShow
      ClientWidth = 360
      ClientHeight = 433
      object Label3: TLabel
        Left = 0
        Height = 32
        Top = 8
        Width = 240
        Alignment = taCenter
        AutoSize = False
        Caption = 'Direct Connection'
        Font.Height = -19
        ParentColor = False
        ParentFont = False
      end
      object editRemoteID: TLabeledEdit
        Left = 112
        Height = 21
        Top = 72
        Width = 120
        EditLabel.AnchorSideLeft.Control = editRemoteID
        EditLabel.AnchorSideTop.Control = editRemoteID
        EditLabel.AnchorSideTop.Side = asrCenter
        EditLabel.AnchorSideRight.Control = editRemoteID
        EditLabel.AnchorSideBottom.Control = editRemoteID
        EditLabel.Left = 31
        EditLabel.Height = 14
        EditLabel.Top = 75
        EditLabel.Width = 78
        EditLabel.Caption = 'Your friend''s IP:'
        EditLabel.ParentColor = False
        LabelPosition = lpLeft
        TabOrder = 0
      end
      object editLocalIP: TLabeledEdit
        Left = 112
        Height = 21
        Top = 104
        Width = 120
        EditLabel.AnchorSideLeft.Control = editLocalIP
        EditLabel.AnchorSideTop.Control = editLocalIP
        EditLabel.AnchorSideTop.Side = asrCenter
        EditLabel.AnchorSideRight.Control = editLocalIP
        EditLabel.AnchorSideBottom.Control = editLocalIP
        EditLabel.Left = 27
        EditLabel.Height = 14
        EditLabel.Top = 107
        EditLabel.Width = 82
        EditLabel.Caption = 'Your IP Address:'
        EditLabel.ParentColor = False
        LabelPosition = lpLeft
        ReadOnly = True
        TabOrder = 1
      end
      object btnConnect: TBitBtn
        Left = 8
        Height = 30
        Top = 184
        Width = 224
        Caption = 'Connect'
        OnClick = btnConnectClick
        TabOrder = 2
      end
    end
    object pageConnecting: TUNBPage
      OnBeforeShow = pageBeforeShow
      ClientWidth = 360
      ClientHeight = 433
      object Label4: TLabel
        Left = 0
        Height = 32
        Top = 8
        Width = 240
        Alignment = taCenter
        AutoSize = False
        Caption = 'Connecting'
        Font.Height = -19
        ParentColor = False
        ParentFont = False
      end
      object ProgressBar1: TProgressBar
        Left = 8
        Height = 20
        Top = 56
        Width = 100
        TabOrder = 0
      end
    end
    object pageGame: TUNBPage
      OnBeforeShow = pageBeforeShow
      ClientWidth = 360
      ClientHeight = 433
      object Label5: TLabel
        Left = 0
        Height = 32
        Top = 8
        Width = 240
        Alignment = taCenter
        AutoSize = False
        Caption = 'Playing'
        Font.Height = -19
        ParentColor = False
        ParentFont = False
      end
      object labelPos: TLabel
        Left = 8
        Height = 14
        Top = 392
        Width = 40
        Caption = 'labelPos'
        ParentColor = False
      end
    end
    object pageWebservice: TUNBPage
      ClientWidth = 360
      ClientHeight = 433
      object editWebserviceURL: TLabeledEdit
        Left = 72
        Height = 21
        Top = 72
        Width = 280
        EditLabel.AnchorSideLeft.Control = editPlayerName
        EditLabel.AnchorSideTop.Control = editPlayerName
        EditLabel.AnchorSideTop.Side = asrCenter
        EditLabel.AnchorSideRight.Control = editPlayerName
        EditLabel.AnchorSideBottom.Control = editPlayerName
        EditLabel.Left = 24
        EditLabel.Height = 14
        EditLabel.Top = 75
        EditLabel.Width = 61
        EditLabel.Caption = 'Player Name'
        EditLabel.ParentColor = False
        LabelPosition = lpLeft
        TabOrder = 0
        Text = 'http://www.bobswart.nl/cgi-bin/ChessISAPIServer.dll/wsdl/IDelphiChess'
      end
      object Label8: TLabel
        Left = 0
        Height = 32
        Top = 8
        Width = 360
        Alignment = taCenter
        AutoSize = False
        Caption = 'Playing through the Chess Webservice'
        Font.Height = -19
        ParentColor = False
        ParentFont = False
      end
      object Button1: TButton
        Left = 35
        Height = 25
        Top = 140
        Width = 75
        Caption = 'Button1'
        TabOrder = 1
      end
    end
  end
  object timerChessTimer: TTimer
    OnTimer = timerChessTimerTimer
    left = 296
    top = 152
  end
end