object formPromotion: TformPromotion
  Left = 423
  Height = 86
  Top = 233
  Width = 287
  Caption = 'Promote to...'
  ClientHeight = 86
  ClientWidth = 287
  OnShow = FormShow
  LCLVersion = '0.9.31'
  object labelSelectPiece: TLabel
    Left = 83
    Height = 19
    Top = 0
    Width = 106
    Caption = 'Select piece:'
    Font.Height = -15
    Font.Name = 'Sans'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object imageRook: TImage
    Left = 0
    Height = 70
    Top = 16
    Width = 72
    OnClick = imageRookClick
  end
  object imageKnight: TImage
    Left = 72
    Height = 70
    Top = 16
    Width = 72
    OnClick = imageKnightClick
  end
  object imageBishop: TImage
    Left = 144
    Height = 70
    Top = 16
    Width = 72
    OnClick = imageBishopClick
  end
  object imageQueen: TImage
    Left = 216
    Height = 70
    Top = 16
    Width = 72
    OnClick = imageQueenClick
  end
end