home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 6 B / CHIP_HITWARE6_B.iso / gry / tetris99 / Tetris99.exe / TETRIS.EXE / 0 / RCDATA / TFRMTETRIS / TFRMTETRIS.txt < prev   
Encoding:
Text File  |  1998-08-20  |  17.3 KB  |  491 lines
  1. object frmTetris: TfrmTetris
  2.   Left = 207
  3.   Top = 148
  4.   BorderIcons = [biSystemMenu, biMinimize]
  5.   BorderStyle = bsSingle
  6.   Caption = 'Tetris '#39'99'
  7.   ClientHeight = 340
  8.   ClientWidth = 195
  9.   Font.Charset = ANSI_CHARSET
  10.   Font.Color = clBlack
  11.   Font.Height = -12
  12.   Font.Name = 'Arial'
  13.   Font.Style = []
  14.   Icon.Data = {<image000.ico>}
  15.   Scaled = False
  16.   ShowHint = True
  17.   Visible = True
  18.   OnClose = FormClose
  19.   OnCloseQuery = FormCloseQuery
  20.   OnCreate = FormCreate
  21.   OnKeyDown = FormKeyDown
  22.   OnKeyPress = FormKeyPress
  23.   OnPaint = FormPaint
  24.   OnShow = FormShow
  25.   PixelsPerInch = 96
  26.   TextHeight = 15
  27.   object bvPreview: TBevel
  28.     Left = 127
  29.     Top = 158
  30.     Width = 62
  31.     Height = 30
  32.   end
  33.   object Bevel2: TBevel
  34.     Left = 127
  35.     Top = 284
  36.     Width = 62
  37.     Height = 17
  38.   end
  39.   object Bevel1: TBevel
  40.     Left = 127
  41.     Top = 249
  42.     Width = 62
  43.     Height = 18
  44.   end
  45.   object Label1: TLabel
  46.     Left = 127
  47.     Top = 235
  48.     Width = 62
  49.     Height = 13
  50.     Alignment = taCenter
  51.     AutoSize = False
  52.     Caption = 'Level'
  53.     Font.Charset = ANSI_CHARSET
  54.     Font.Color = clBlack
  55.     Font.Height = -12
  56.     Font.Name = 'Arial'
  57.     Font.Style = [fsBold]
  58.     ParentFont = False
  59.   end
  60.   object Label2: TLabel
  61.     Left = 127
  62.     Top = 270
  63.     Width = 62
  64.     Height = 13
  65.     Alignment = taCenter
  66.     AutoSize = False
  67.     Caption = 'Score'
  68.     Font.Charset = ANSI_CHARSET
  69.     Font.Color = clBlack
  70.     Font.Height = -12
  71.     Font.Name = 'Arial'
  72.     Font.Style = [fsBold]
  73.     ParentFont = False
  74.   end
  75.   object lblLevel: TLabel
  76.     Left = 130
  77.     Top = 251
  78.     Width = 56
  79.     Height = 13
  80.     Alignment = taCenter
  81.     AutoSize = False
  82.     Caption = '99'
  83.   end
  84.   object lblScore: TLabel
  85.     Left = 130
  86.     Top = 285
  87.     Width = 56
  88.     Height = 13
  89.     Alignment = taCenter
  90.     AutoSize = False
  91.     Caption = '99999'
  92.   end
  93.   object Bevel3: TBevel
  94.     Left = 3
  95.     Top = 3
  96.     Width = 115
  97.     Height = 330
  98.   end
  99.   object sbtLeft: TSpeedButton
  100.     Left = 128
  101.     Top = 192
  102.     Width = 21
  103.     Height = 22
  104.     Hint = 'move left'
  105.     Enabled = False
  106.     Flat = True
  107.     Glyph.Data = {
  108.       76010000424D7601000000000000760000002800000020000000100000000100
  109.       0400000000000001000000000000000000001000000010000000000000000000
  110.       80000080000000808000800000008000800080800000C0C0C000808080000000
  111.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333338333
  112.       3333333333338333333333333336883333333333333638333333333333668888
  113.       88333333336383838333333336E688888883333336363838383333336E668888
  114.       888833336363838383833336E6E6666668333336363636363833336E6E6E6E6E
  115.       6883336363636363638336E6E6E6E6E6E33336363636363633333EEEEEEEEEEE
  116.       E33333E3E3E3E3E3E33333EEEEEEEEEEE333333E3E3E3E3E3333333EEEEEEEEE
  117.       E3333333E3E3E3E3E3333333EEEE3333333333333E3E3333333333333EEE3333
  118.       3333333333E333333333333333EE333333333333333E333333333333333E3333
  119.       3333333333333333333333333333333333333333333333333333}
  120.     Margin = 1
  121.     NumGlyphs = 2
  122.     OnClick = sbtLeftClick
  123.   end
  124.   object sbtTurn: TSpeedButton
  125.     Left = 149
  126.     Top = 192
  127.     Width = 21
  128.     Height = 22
  129.     Hint = 'rotate blocks'
  130.     Enabled = False
  131.     Flat = True
  132.     Glyph.Data = {
  133.       46010000424D460100000000000076000000280000001C0000000D0000000100
  134.       040000000000D0000000CE0E0000C40E00001000000000000000000000000000
  135.       80000080000000808000800000008000800080800000C0C0C000808080000000
  136.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888333883
  137.       3338383833383333000033888888888833338383838383330000666668888888
  138.       833636383838383300006666633E688888636363336383830000666663EEE633
  139.       333636333E363333000066666EEE6E6333636363E363633300006666EEEEE6E6
  140.       3336363E3E3636330000666EEEEE6E6E636363E3E3636363000066EEEEEEE6E6
  141.       E6363E3E3E3636360000366666EE6E3333336363E36333330000366666EEE633
  142.       333636363E363333000033666EEE633333336363E36333330000333EEEE63333
  143.       33333E3E363333330000}
  144.     Margin = 3
  145.     NumGlyphs = 2
  146.     OnClick = sbtTurnClick
  147.   end
  148.   object sbtRight: TSpeedButton
  149.     Left = 170
  150.     Top = 192
  151.     Width = 21
  152.     Height = 22
  153.     Hint = 'move right'
  154.     Enabled = False
  155.     Flat = True
  156.     Glyph.Data = {
  157.       76010000424D7601000000000000760000002800000020000000100000000100
  158.       04000000000000010000CE0E0000C40E00001000000000000000000000000000
  159.       80000080000000808000800000008000800080800000C0C0C000808080000000
  160.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333833
  161.       333333333333383333333333333368883333333333336383833333338888E688
  162.       88333333383836383833333338886E688888333383836363838333333388E6E6
  163.       88833333333836363833333666666E6E633333336363636363333336E6E6E6E6
  164.       E6333336363636363633333E6E6E6E6E6E633333636363636363333EEEEEEEEE
  165.       EEE3333E3E3E3E3E3E33333EEEEEEEEEEE333333E3E3E3E3E333333EEEEEEEEE
  166.       E333333E3E3E3E3E333333333333EEEE333333333333E3E3333333333333EEE3
  167.       3333333333333E33333333333333EE33333333333333E333333333333333E333
  168.       3333333333333333333333333333333333333333333333333333}
  169.     Margin = 1
  170.     NumGlyphs = 2
  171.     OnClick = sbtRightClick
  172.   end
  173.   object sbtDown: TSpeedButton
  174.     Left = 149
  175.     Top = 214
  176.     Width = 21
  177.     Height = 20
  178.     Hint = 'put blocks'
  179.     Enabled = False
  180.     Flat = True
  181.     Glyph.Data = {
  182.       76010000424D7601000000000000760000002800000020000000100000000100
  183.       04000000000000010000CE0E0000C40E00001000000000000000000000000000
  184.       80000080000000808000800000008000800080800000C0C0C000808080000000
  185.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333338833
  186.       33333333333338333333333333338888333333333333838333333333333E6888
  187.       88333333333E38383833333333EEE6888888333333E36383838333333EEE6E68
  188.       883333333E3E363838333333EEEEE6E688833333E3E363638383333EEEEE6E6E
  189.       6333333E3E3E3636333333EEEEEEE6E6E63333E3E3E3636363333EEEEEEE6E6E
  190.       6E633E3E3E3E3636363333333EEEE6E33333333333E36363333333333EEE6E63
  191.       333333333E3E3633333333333EEEE6E33333333333E36363333333333EEE6E63
  192.       333333333E3E3633333333333EEEE6E33333333333E363633333333333333333
  193.       3333333333333333333333333333333333333333333333333333}
  194.     Margin = 1
  195.     NumGlyphs = 2
  196.     OnClick = sbtDownClick
  197.   end
  198.   object sbtStart: TSpeedButton
  199.     Left = 127
  200.     Top = 4
  201.     Width = 66
  202.     Height = 25
  203.     Hint = 'start a new game'
  204.     Caption = '&Start'
  205.     Flat = True
  206.     Font.Charset = ANSI_CHARSET
  207.     Font.Color = clBlack
  208.     Font.Height = -11
  209.     Font.Name = 'Arial'
  210.     Font.Style = []
  211.     Glyph.Data = {
  212.       56020000424D560200000000000076000000280000002A000000140000000100
  213.       040000000000E001000000000000000000001000000000000000000000000000
  214.       80000080000000808000800000008000800080800000C0C0C000808080000000
  215.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333388
  216.       3333338333333333333833333338330000003333333300088333388833333333
  217.       33038333338383000000333333330B0883338888333333333030383338383300
  218.       000033333330B03888888888333333330303838383838300000033333330B038
  219.       88888888833333333B3338383838380000003333330B0333888FC88883333333
  220.       B3333383F383830000003333330B083388FFCC88833333303033383F3C383800
  221.       0000333330B0FF888FCCF8888333330303F383F3338383000000333330B0FFCC
  222.       FFCCF8883333333B3F333F3C3F383300000033330B0FCCFFCCFF8333333333B3
  223.       F3C3F333F3333300000033330B0FCCFFCCFF833333333030333F3C3F38333300
  224.       00003330B0CCFFCCFFCC833333330303C3F333F3C333330000003330B0CCFFCC
  225.       FFCC833333333B333F3C3F33383333000000330B0CFFCCFFCCF833333333B3C3
  226.       F333F3C3833333000000330B0CFFCCFFCCF833333330303F3C3F333F33333300
  227.       000030B0FFCCFFCCFFC83333330303F333F3C3F383333300000030B0FFCCFFCC
  228.       F8883333333B3F3C3F333F383333330000000B0FCCFFCC888338333333B3F333
  229.       F3C383338333330000000008CCFF88333333333330308C3F3833333333333300
  230.       0000333388883333333333333333338383333333333333000000}
  231.     Margin = 3
  232.     NumGlyphs = 2
  233.     ParentFont = False
  234.     Spacing = 5
  235.     OnClick = sbtStartClick
  236.   end
  237.   object sbtPause: TSpeedButton
  238.     Left = 127
  239.     Top = 29
  240.     Width = 66
  241.     Height = 25
  242.     Hint = 'Pause game to take a breath..'
  243.     Caption = '&Pause'
  244.     Enabled = False
  245.     Flat = True
  246.     Font.Charset = ANSI_CHARSET
  247.     Font.Color = clBlack
  248.     Font.Height = -11
  249.     Font.Name = 'Arial'
  250.     Font.Style = []
  251.     Glyph.Data = {
  252.       56020000424D560200000000000076000000280000002A000000140000000100
  253.       040000000000E001000000000000000000001000000000000000000000000000
  254.       80000080000000808000800000008000800080800000C0C0C000808080000000
  255.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  256.       3333333333333333333333333333330000003338888888888888883333333838
  257.       3838383838333300000033338888888888888833333333838383838383833300
  258.       000033CCCCCCCCCCCCCCC883333C3C3C3C3C3C3C3C383300000033CCCECEEECE
  259.       EECCC8883333C3E3E3E3E3E3C3838300000033CCCECECECECECCC888333C3C3C
  260.       3C3C3C3C3C383300000033CCCECECECECECCC8888333C3E3E3E3E3E3C3838300
  261.       000033CCCECEEECEEECCC333333C3C3C3E3C3E3C3C333300000033CCCCCCCCCC
  262.       CCCCC3333333C3C3C3C3C3C3C3333300000033CFFFFFFFFFFFFFC333333C3F3F
  263.       3F3F3F3F3C333300000033CF0FFFFFFFFF0FC3333333F3F3F3F3F3F3F3333300
  264.       000033CF0FFFFFFFFF0FC333333C303F3F3F3F303C333300000033CF00000000
  265.       000FC3333333F30303030303F3333300000033CF0000FFFFFF0FC333333C3030
  266.       3F3F3F303C333300000033CF0FFFFFFFFF0FC3333333F3F3F3F3F3F3F3333300
  267.       000033CFFFFFFFFFFFFFC333333C3F3F3F3F3F3F3C333300000033CFFFFFFFFF
  268.       FFFFC3333333F3F3F3F3F3F3F3333300000033CFFFFFFFFFFFFFC333333C3F3F
  269.       3F3F3F3F3C333300000033CCCCCCCCCCCCCCC3333333C3C3C3C3C3C3C3333300
  270.       0000333333333333333333333333333333333333333333000000}
  271.     Margin = 4
  272.     NumGlyphs = 2
  273.     ParentFont = False
  274.     Spacing = 2
  275.     OnClick = sbtPauseClick
  276.   end
  277.   object sbtOpts: TSpeedButton
  278.     Left = 127
  279.     Top = 54
  280.     Width = 66
  281.     Height = 25
  282.     Hint = 'Game options..'
  283.     Caption = '&Options'
  284.     Flat = True
  285.     Font.Charset = ANSI_CHARSET
  286.     Font.Color = clBlack
  287.     Font.Height = -11
  288.     Font.Name = 'Arial'
  289.     Font.Style = []
  290.     Glyph.Data = {
  291.       56020000424D560200000000000076000000280000002A000000140000000100
  292.       040000000000E001000000000000000000001000000000000000000000000000
  293.       80000080000000808000800000008000800080800000C0C0C000808080000000
  294.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333388833
  295.       3888333333333333838333838333330000003333330008830000833333333330
  296.       3038303038333300000033333033308099110833333333033303039313833300
  297.       0000333330BB3080999108333333333B33383939303833000000333330BB3080
  298.       9991088333333303B3030393138333000000333330BB3030999108883333333B
  299.       33333939303833000000333330BB30309991088333333303B303039313833300
  300.       0000333330BB3030999103883333333B33333939303833000000333330BB3088
  301.       0910888883333303B3038393038383000000333330BB3080999108888333333B
  302.       33383939303838000000333330BB30330000333333333303B303330303333300
  303.       0000333330BB3033300333333333333B33333330333333000000333330BB3033
  304.       3003333333333303B30333033333330000003000000000000003333333303030
  305.       3030303033333300000030888888888880033333330383838383830333333300
  306.       0000308888888888088033333338383838383038333333000000330888888888
  307.       0880333333338383838383830333330000003330000000000880333333333030
  308.       3030303833333300000033333000003300003333333333030303330303333300
  309.       0000333333333333333333333333333333333333333333000000}
  310.     Margin = 3
  311.     NumGlyphs = 2
  312.     ParentFont = False
  313.     Spacing = 2
  314.     OnClick = sbtOptsClick
  315.   end
  316.   object sbtClose: TSpeedButton
  317.     Left = 127
  318.     Top = 129
  319.     Width = 66
  320.     Height = 25
  321.     Hint = 'Exit Tetris '#39'99..'
  322.     Caption = '&Close'
  323.     Flat = True
  324.     Font.Charset = ANSI_CHARSET
  325.     Font.Color = clBlack
  326.     Font.Height = -11
  327.     Font.Name = 'Arial'
  328.     Font.Style = []
  329.     Glyph.Data = {
  330.       56020000424D560200000000000076000000280000002A000000140000000100
  331.       040000000000E001000000000000000000001000000000000000000000000000
  332.       80000080000000808000800000008000800080800000C0C0C000808080000000
  333.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  334.       3333333333333333333333333333330000003833333333333333833333833333
  335.       3333333333333300000000333333333333300833303333333333333330333300
  336.       00000F83333333333330F83333F33333333333330383330000000F8333333333
  337.       3330F83330383333333333333F33330000000F88333333333330F83333F38333
  338.       333333330383330000000F88333333333330F88330383333333333333F383300
  339.       00000F38833333333330F88333F38333333333330383330000000F3888338888
  340.       8330F38330333833383838333F38330000000F33888888888880F88833F33383
  341.       838383830383830000000F33388111111880F88830333338313131383F383300
  342.       00000F11111919191110F88833F31313939393130383830000000F19191B9B9B
  343.       B910F8888031313139393B313F38380000000F919BBBBB1B1B90F88883F313B3
  344.       B3B3B3B30383830000000F1B1B1B9B9BB910F3333031313139393B313F333300
  345.       00000F9B9BB919191B90F33333F3B3B3939393B30333330000000F1919111111
  346.       1910F33330313131313131313F33330000000F11111333333110F33333F31313
  347.       3333331303333300000033333333333333333333333333333333333333333300
  348.       0000333333333333333333333333333333333333333333000000}
  349.     Margin = 4
  350.     NumGlyphs = 2
  351.     ParentFont = False
  352.     Spacing = 5
  353.     OnClick = sbtCloseClick
  354.   end
  355.   object sbtHelp: TSpeedButton
  356.     Left = 127
  357.     Top = 104
  358.     Width = 66
  359.     Height = 25
  360.     Hint = 'Show help..'
  361.     Caption = '&Help'
  362.     Flat = True
  363.     Font.Charset = ANSI_CHARSET
  364.     Font.Color = clBlack
  365.     Font.Height = -11
  366.     Font.Name = 'Arial'
  367.     Font.Style = []
  368.     Glyph.Data = {
  369.       56020000424D560200000000000076000000280000002A000000140000000100
  370.       040000000000E001000000000000000000001000000000000000000000000000
  371.       80000080000000808000800000008000800080800000C0C0C000808080000000
  372.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333338833
  373.       3333333333333333338333333333330000003333333008883333333333333333
  374.       303833333333330000003333330CC0883333333333333333C303833333333300
  375.       00003333330EC03333333333333333303C333333333333000000333333300338
  376.       8833333333333333033383833333330000003333330CC0388883333333333330
  377.       3C3338383333330000003333330EC0338888883333333333E303338383833300
  378.       00003333330EC03333388883333333303C3333333838330000003333330ECC08
  379.       8333888833333333E3C3833333838300000033333330ECC03888888833333333
  380.       3E3C3338383833000000333003330ECC088888333333033333E3C38383833300
  381.       0000330EC03330ECC033333333303C33333E3C33333333000000330EC033330E
  382.       C03333333333E3033333E303333333000000330EC033330EC033333333303C33
  383.       33303C33333333000000330EC033330EC03333333333E3033333E30333333300
  384.       0000330ECC0000ECC033333333303C30303E3C333333330000003330ECCCCCCC
  385.       03333333333303C3C3C3C33333333300000033330EEEEEE0333333333333303E
  386.       3E3E333333333300000033333000000333333333333333030303333333333300
  387.       0000333333333333333333333333333333333333333333000000}
  388.     Margin = 5
  389.     NumGlyphs = 2
  390.     ParentFont = False
  391.     Spacing = 5
  392.     OnClick = sbtHelpClick
  393.   end
  394.   object sbtScore: TSpeedButton
  395.     Left = 127
  396.     Top = 79
  397.     Width = 66
  398.     Height = 25
  399.     Hint = 'Highscore history..'
  400.     Caption = 'Scor&es'
  401.     Flat = True
  402.     Font.Charset = ANSI_CHARSET
  403.     Font.Color = clBlack
  404.     Font.Height = -11
  405.     Font.Name = 'Arial'
  406.     Font.Style = []
  407.     Glyph.Data = {
  408.       56020000424D560200000000000076000000280000002A000000140000000100
  409.       040000000000E001000000000000000000001000000000000000000000000000
  410.       80000080000000808000800000008000800080800000C0C0C000808080000000
  411.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  412.       3333333333333333333333333333330000003333333888888883333333333333
  413.       8383838333333300000033333388888888888833333333383838383838333300
  414.       0000333338000000033888883333338303030333838383000000333300AA030A
  415.       A00338888333303A30303A3033383800000033302A0083300A203388833303A3
  416.       033303A30333830000003302A008888300A2038883303A303838303A30383800
  417.       000033300A0338880A008888333303A3338383A3038383000000330220333333
  418.       8022088333303233333338323038330000003020033333333300203333030333
  419.       3333333303033300000030A2033333333302A033333A3033333333303A333300
  420.       000030A2033333333302A0333303233333333333230333000000302003333333
  421.       3300203333323033333333303233330000003302A033333330A2033333332303
  422.       3333330323333300000033300033333330003333333330333333333033333300
  423.       0000330AA003333300AA03333333A30333333303A33333000000333020A03330
  424.       A02033333333323A33333A323333330000003333030033300303333333333333
  425.       0333033333333300000033333333333333333333333333333333333333333300
  426.       0000333333333333333333333333333333333333333333000000}
  427.     Margin = 3
  428.     NumGlyphs = 2
  429.     ParentFont = False
  430.     Spacing = 2
  431.     OnClick = sbtScoreClick
  432.   end
  433.   object Label5: TLabel
  434.     Left = 127
  435.     Top = 304
  436.     Width = 62
  437.     Height = 15
  438.     Alignment = taCenter
  439.     AutoSize = False
  440.     Caption = 'Highscore'
  441.     Font.Charset = ANSI_CHARSET
  442.     Font.Color = clBlack
  443.     Font.Height = -12
  444.     Font.Name = 'Arial'
  445.     Font.Style = [fsBold]
  446.     ParentFont = False
  447.   end
  448.   object Bevel4: TBevel
  449.     Left = 127
  450.     Top = 319
  451.     Width = 62
  452.     Height = 17
  453.   end
  454.   object lblHiScore: TLabel
  455.     Left = 130
  456.     Top = 321
  457.     Width = 56
  458.     Height = 13
  459.     Hint = 'try to beat this !'
  460.     Alignment = taCenter
  461.     AutoSize = False
  462.     Caption = '0'
  463.     Font.Charset = DEFAULT_CHARSET
  464.     Font.Color = clMaroon
  465.     Font.Height = -12
  466.     Font.Name = 'MS Sans Serif'
  467.     Font.Style = []
  468.     ParentFont = False
  469.   end
  470.   object Shape1: TShape
  471.     Left = 4
  472.     Top = 336
  473.     Width = 69
  474.     Height = 3
  475.     Brush.Color = clMaroon
  476.     Pen.Color = clRed
  477.   end
  478.   object Timer1: TTimer
  479.     Enabled = False
  480.     Interval = 50
  481.     OnTimer = Timer1Timer
  482.     Left = 4
  483.     Top = 4
  484.   end
  485.   object MyTray: TTraybar
  486.     OnDblClick = MyTrayDblClick
  487.     Left = 36
  488.     Top = 4
  489.   end
  490. end
  491.