home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Más de 2,500 Juegos
/
CD1.iso
/
ZIPDAT
/
0253
/
0253.ZIP
/
STUDPOK.EXE
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1998-02-20
|
9KB
|
267 lines
object Form1: TForm1
Left = 436
Top = 264
HelpContext = 41001
BorderStyle = bsDialog
Caption = 'Select Your Game'
ClientHeight = 292
ClientWidth = 200
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object chip100: TImage
Left = 296
Top = 16
Width = 48
Height = 48
Picture.Data = {<image000.bmp>}
Visible = False
end
object chip25: TImage
Left = 352
Top = 16
Width = 48
Height = 48
Picture.Data = {<image001.bmp>}
Visible = False
end
object chip5: TImage
Left = 408
Top = 16
Width = 48
Height = 48
Picture.Data = {<image002.bmp>}
Visible = False
end
object chip1: TImage
Left = 464
Top = 16
Width = 48
Height = 48
Picture.Data = {<image003.bmp>}
Visible = False
end
object chip10k: TImage
Left = 296
Top = 72
Width = 48
Height = 48
Picture.Data = {<image004.bmp>}
Visible = False
end
object chip1k: TImage
Left = 352
Top = 72
Width = 48
Height = 48
Picture.Data = {<image005.bmp>}
Visible = False
end
object chip50: TImage
Left = 408
Top = 72
Width = 48
Height = 48
Picture.Data = {<image006.bmp>}
Visible = False
end
object chip500: TImage
Left = 464
Top = 72
Width = 48
Height = 48
Picture.Data = {<image007.bmp>}
Visible = False
end
object chip5k: TImage
Left = 296
Top = 128
Width = 48
Height = 48
Picture.Data = {<image008.bmp>}
Visible = False
end
object ChipMask: TImage
Left = 352
Top = 128
Width = 48
Height = 48
Picture.Data = {<image009.bmp>}
Visible = False
end
object Digits: TImage
Left = 296
Top = 224
Width = 188
Height = 147
AutoSize = True
Picture.Data = {<image010.bmp>}
Visible = False
end
object BitBtn1: TBitBtn
Left = 6
Top = 5
Width = 187
Height = 68
HelpContext = 41001
Caption = '5-Card Stud Poker'
Default = True
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
E2020000424DE2020000000000007600000028000000210000001F0000000100
0400000000006C020000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222220000000222222222220000222222222222222222000
0000222222222200FFF000222222222222222000000022222222220FFFFFF000
222222222222200000002222222220FF000FFFF0002222222222200000002222
222220F00FF000FFFF000222222220000000222222220FF0FFFFF000FFFF0002
22222000000022222220FF0FFF000FFF000FFF002222200000002222220FF0FF
F00FF000FFF00002222220000000222220FF0FFFF0FFFFF000FFF00022222000
000022220FFF0FFF0FF00000FF000F022222200000002220FFF0FFF0FFF0FFF0
000000002222200000002200FF0FFF0FFF0F99FFFFFFF000000220000000200F
F0FFFF0FFF0F99FFFFFFFFFFFF002000000020FF0FFFF0FFF00FFFFFFFFFFFF9
9FF0200000002200FFFF0FFFF0FFFFFFFFFFFFF99F02200000002200FFF0FFFF
F0FFFFFFFFFFFFFFFF0220000000220FFF0FFFF000FFFFFF999FFFFFF0022000
0000220000FFFF000FFFFFF9999FFFFFF02220000000222200FFFF000FFFFF99
9999FFFFF0222000000022220FFFFF00FFFFFFF99999FFFF0022200000002222
000FFFF0FFFFFFF9999FFFFF022220000000222222200000FFFFFFFF99FFFFFF
02222000000022222222200FF99FFFFFFFFFFFF022222000000022222222220F
F99FFFFFFFFFFFF0222220000000222222222200FFFFFFFFFFF99F0022222000
000022222222222000000FFFFFF99F0222222000000022222222222222220000
00FFFF0222222000000022222222222222222222200000222222200000002222
2222222222222222222222222222200000002222222222222222222222222222
222220000000}
Layout = blGlyphTop
end
object BitBtn2: TBitBtn
Left = 6
Top = 149
Width = 187
Height = 68
HelpContext = 41001
Caption = 'Fast Action Hold '#39'Em Poker'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
04000000000000020000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222222222222799999999722222222222222222227999
9999999999972222222222222220009999999999990002222222222222000099
9999999999000022222222222000000999999999900000022222222200000009
999999999000000022222227000000009BBBBBB900000000722222290000000B
BBCBBBCBB000000092222299990000BBBBCBBBCBBB0000999922229999990BBB
CCCCCCCCCBB09999992227999999BBBBBBCBBBCBCBBB9999997229999999BBBB
BBCBBBCBCBBB999999922999999BBBBBBBCBBBCBCBBBB99999922999999BBBBB
BBCBBBCBCBBBB99999922999999BBBBBCCCCCCCCCBBBB99999922999999BBBBB
CBCBBBCBBBBBB99999922999999BBBBBCBCBBBCBBBBBB99999922999999BBBBB
CBCBBBCBBBBBB999999229999999BBBBCBCBBBCBBBBB9999999227999999BBBB
CCCCCCCCCBBB99999972229999990BBBBBCBBBCBBBB0999999222299990000BB
BBCBBBCBBB000099992222290000000BBBBBBBBBB00000009222222700000000
9BBBBBB900000000722222220000000999999999900000002222222220000009
9999999990000002222222222200009999999999990000222222222222200099
9999999999000222222222222222799999999999999722222222222222222227
9999999972222222222222222222222222222222222222222222}
Layout = blGlyphTop
end
object BitBtn3: TBitBtn
Left = 6
Top = 77
Width = 187
Height = 68
HelpContext = 41001
Caption = 'Double Down Stud Poker'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = BitBtn3Click
Glyph.Data = {
1E030000424D1E03000000000000760000002800000022000000220000000100
040000000000A8020000CE0E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222222222222222222222000000200000000000000000000000000000000200
0000200099999999999999999999999999900200000020000111111111111111
1111111111000200000020000000000000000000000000000000020000002000
0000000000000000000000000000020000002000000000000000000000000000
0000020000002000000000000000000000000000000002000000208333333333
33B3333330000003333332000000203BBBBB33333BB3BBBB3100003333BB0200
0000201BBBBBB3333BB03BBBB30003333B70020000002003BBBB3333333003BB
BB3003333730020000002000BBBB3300000001BBBB313333B700020000002000
3BBB33100000003BBBB3333B710002000000200003BBB3310000000BBBBB3337
8000020000002000003BB33330000003BBBB33B700000200000020000003BB33
310000003BB33B73000002000000200000001B33330000001BB33B3000000200
00002000000001B33B30000033B3333000000200000020000000008B3B300003
333BB33300000200000020001333103B3BB000033BBBB333300002000000203B
3BB3103B3BB0003333B7BB33300002000000200BBB330033B7B001333B733BB3
3300020000002003BB333333B730033BBB8003BB3330020000002000BBBB333B
B30033BBBB0003BB333002000000200003BBBBB330003BBBB300003BB3B30200
0000200000013100000011333000000111110200000020000000000000000000
0000000000000200000020000000000000000000000000000000020000002000
0000000000000000000000000000020000002000011111111111111111111111
1100020000002000999999999999999999999999999002000000200000000000
0000000000000000000002000000222222222222222222222222222222222200
0000}
Layout = blGlyphTop
end
object BitBtn4: TBitBtn
Left = 6
Top = 221
Width = 187
Height = 68
HelpContext = 41001
Cancel = True
Caption = 'E&xit the Game'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Fo