home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Más de 2,500 Juegos
/
CD1.iso
/
ZIPDAT
/
0738
/
0738.ZIP
/
_SETUP.1
/
AllInOneYahtzee.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1999-03-25
|
26KB
|
1,312 lines
object Form1: TForm1
Left = 507
Top = 174
HorzScrollBar.Visible = False
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'All In One Yahtzee'
ClientHeight = 427
ClientWidth = 236
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poScreenCenter
Scaled = False
OnCreate = FormCreate
OnDestroy = FormDestroy
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 34
Top = 360
Width = 164
Height = 36
Shape = bsFrame
end
object SifferSumma: TLabel
Left = 8
Top = 115
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Total'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object BonusLabel: TLabel
Left = 8
Top = 133
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Bonus'
end
object TotalSumma: TLabel
Left = 8
Top = 316
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Total'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DiceImage1: TImage
Left = 40
Top = 366
Width = 24
Height = 24
AutoSize = True
Enabled = False
Picture.Data = {<image000.bmp>}
OnClick = DiceImageClick
end
object DiceImage2: TImage
Left = 72
Top = 366
Width = 24
Height = 24
AutoSize = True
Enabled = False
Picture.Data = {<image001.bmp>}
OnClick = DiceImageClick
end
object DiceImage3: TImage
Left = 104
Top = 366
Width = 24
Height = 24
AutoSize = True
Enabled = False
Picture.Data = {<image002.bmp>}
OnClick = DiceImageClick
end
object DiceImage4: TImage
Left = 136
Top = 366
Width = 24
Height = 24
AutoSize = True
Enabled = False
Picture.Data = {<image003.bmp>}
OnClick = DiceImageClick
end
object DiceImage5: TImage
Left = 168
Top = 366
Width = 24
Height = 24
AutoSize = True
Enabled = False
Picture.Data = {<image004.bmp>}
OnClick = DiceImageClick
end
object MenuBevel: TBevel
Left = 0
Top = 0
Width = 232
Height = 4
Shape = bsTopLine
end
object Label1: TLabel
Left = 8
Top = 8
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Ones'
end
object Label2: TLabel
Left = 8
Top = 25
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Twos'
end
object Label3: TLabel
Left = 8
Top = 43
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Threes'
end
object Label4: TLabel
Left = 8
Top = 61
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Fours'
end
object Label5: TLabel
Left = 8
Top = 79
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Fives'
end
object Label6: TLabel
Left = 8
Top = 97
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Sixes'
end
object Label1par: TLabel
Left = 8
Top = 154
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '1 Pair'
end
object Label2par: TLabel
Left = 8
Top = 172
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '2 Pairs'
end
object LabelTretal: TLabel
Left = 8
Top = 190
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '3 of a Kind'
end
object LabelFyrtal: TLabel
Left = 8
Top = 208
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '4 of a Kind'
end
object LabelLitenStege: TLabel
Left = 4
Top = 226
Width = 100
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Small Straight'
end
object LabelStorStege: TLabel
Left = 4
Top = 244
Width = 100
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Large Straight'
end
object LabelKok: TLabel
Left = 8
Top = 262
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Full House'
end
object LabelChans: TLabel
Left = 8
Top = 280
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Chance'
end
object LabelYatzy: TLabel
Left = 8
Top = 298
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Yahtzee'
end
object Label2ColorPair: TLabel
Left = 8
Top = 502
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '2 Pair Color'
Visible = False
end
object LabelFlush: TLabel
Left = 8
Top = 522
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Flush'
Visible = False
end
object LabelColorHouse: TLabel
Left = 8
Top = 542
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Color House'
Visible = False
end
object Label3par: TLabel
Left = 8
Top = 562
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '3 Pairs'
Visible = False
end
object LabelFemtal: TLabel
Left = 8
Top = 582
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = '5 of a Kind'
Visible = False
end
object LabelFullStraight: TLabel
Left = 8
Top = 602
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Full Straight'
Visible = False
end
object LabelVilla: TLabel
Left = 8
Top = 622
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Villa (3 + 3)'
Visible = False
end
object LabelTower: TLabel
Left = 8
Top = 642
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Tower (2 + 4)'
Visible = False
end
object DiceImage6: TImage
Left = 144
Top = 501
Width = 24
Height = 24
AutoSize = True
Picture.Data = {<image005.bmp>}
OnClick = DiceImageClick
end
object TripleTotalLabel: TLabel
Left = 8
Top = 334
Width = 92
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Grand Total'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Throw: TButton
Left = 39
Top = 399
Width = 153
Height = 24
Caption = 'Throw'
Default = True
TabOrder = 0
OnClick = ThrowClick
end
object Poang1: TEdit
Left = 104
Top = 8
Width = 40
Height = 17
Cursor = crHandPoint
TabStop = False
AutoSize = False
ReadOnly = True
TabOrder = 1
OnClick = SifferButtonClick
end
object Poang2: TEdit
Left = 104
Top = 25
Width = 40
Height = 17
Cursor = crHandPoint
TabStop = False
AutoSize = False
ReadOnly = True
TabOrder = 2
OnClick = SifferButtonClick
end
object Poang3: TEdit
Left = 104
Top = 43
Width = 40
Height = 17
Cursor = crHandPoint
TabStop = False
AutoSize = False
ReadOnly = True
TabOrder = 3
OnClick = SifferButtonClick
end
object Poang4: TEdit
Left = 104
Top = 61
Width = 40
Height = 17
Cursor = crHandPoint
TabStop = False
AutoSize = False
ReadOnly = True
TabOrder = 4
OnClick = SifferButtonClick
end
object Poang5: TEdit
Left = 104
Top = 79
Width = 40
Height = 17
Cursor = crHandPoint
TabStop = False
Aut