You've already forked lazarus-ccr
52 lines
943 B
Plaintext
52 lines
943 B
Plaintext
![]() |
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
|