WDR Computer Club Digital 1997 February/club9702.bin/SHARE95/95GOMOKU/_SETUP.1/Gomoku.exe/0/RCDATA/TWINNERFORM/TWINNERFORM.txt

Text File | 1996-09-02 | 6KB | 301 lines

object WinnerForm: TWinnerForm
  Left = 179
  Top = 191
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Game Over:'
  ClientHeight = 229
  ClientWidth = 332
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'System'
  Font.Style = [fsBold]
  KeyPreview = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Background: TImage
    Left = 0
    Top = 0
    Width = 332
    Height = 229
    Align = alClient
    Picture.Data = {<image000.bmp>}
    Stretch = True
  end
  object Bevel2: TBevel
    Left = 0
    Top = 0
    Width = 332
    Height = 229
    Align = alClient
    Shape = bsFrame
  end
  object Label2: TLabel
    Left = 16
    Top = 48
    Width = 136
    Height = 12
    Caption = 'Moves Done     : '
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 16
    Top = 72
    Width = 136
    Height = 12
    Caption = 'Time Taken     : '
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Bevel1: TBevel
    Left = 16
    Top = 40
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Bevel3: TBevel
    Left = 16
    Top = 64
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Bevel4: TBevel
    Left = 16
    Top = 184
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Label5: TLabel
    Left = 16
    Top = 96
    Width = 128
    Height = 12
    Caption = 'Hints Used     :'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Bevel5: TBevel
    Left = 16
    Top = 88
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object MovesDone: TLabel
    Left = 152
    Top = 48
    Width = 72
    Height = 12
    Caption = 'MovesDone'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object TimeTaken: TLabel
    Left = 152
    Top = 72
    Width = 72
    Height = 12
    Caption = 'TimeTaken'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object HintsUsed: TLabel
    Left = 152
    Top = 96
    Width = 8
    Height = 12
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object WinnerColor: TShape
    Left = 88
    Top = 12
    Width = 25
    Height = 20
    Brush.Color = clAqua
    Shape = stCircle
  end
  object LabelEffect1: TLabelEffect
    Left = 14
    Top = 4
    Width = 75
    Height = 33
    DepthHighlight = 0
    DepthShadow = 2
    DirectionHighlight = edNone
    ColourHighlight = clAqua
    ColourShadow = clNavy
    EffectStyle = esShadow
    ColourScheme = csSteel
    Caption = 'Won:'
    Font.Color = clWhite
    Font.Height = -27
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object WinnerName: TLabelEffect
    Left = 118
    Top = 5
    Width = 211
    Height = 33
    DepthHighlight = 0
    DepthShadow = 2
    DirectionHighlight = edNone
    ColourHighlight = clAqua
    ColourShadow = clNavy
    EffectStyle = esShadow
    ColourScheme = csSteel
    Font.Color = clWhite
    Font.Height = -27
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Bevel6: TBevel
    Left = 16
    Top = 136
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Label1: TLabel
    Left = 16
    Top = 168
    Width = 128
    Height = 12
    Caption = 'Switched Sides :'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object CommentsUsed: TLabel
    Left = 152
    Top = 144
    Width = 8
    Height = 12
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Bevel7: TBevel
    Left = 16
    Top = 160
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Label4: TLabel
    Left = 16
    Top = 144
    Width = 128
    Height = 12
    Caption = 'Comments Used  :'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object SwitchedSides: TLabel
    Left = 152
    Top = 168
    Width = 8
    Height = 12
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label6: TLabel
    Left = 16
    Top = 120
    Width = 128
    Height = 12
    Caption = 'Undo Used      :'
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object UndoUsed: TLabel
    Left = 152
    Top = 120
    Width = 8
    Height = 12
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MSI Console'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Bevel8: TBevel
    Left = 16
    Top = 112
    Width = 305
    Height = 9
    Shape = bsTopLine
  end
  object Button1: TButton
    Left = 117
    Top = 200
    Width = 99
    Height = 25
    Caption = '&OK'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 0
  end
end