home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 January / Chip_1999-01_cd.bin / zkuste / delphi / D1 / CALCBOX.ZIP / COMPONEN / MYSMALL.DFM / MYSMALL.txt
Text File  |  1996-01-22  |  14KB  |  427 lines
  1. object SmallCalc: TSmallCalc
  2.   Left = 220
  3.   Top = 146
  4.   BorderIcons = []
  5.   BorderStyle = bsNone
  6.   Caption = 'SmallCalc'
  7.   ClientHeight = 149
  8.   ClientWidth = 125
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   KeyPreview = True
  14.   PixelsPerInch = 96
  15.   Position = poDefault
  16.   OnCreate = StartUp
  17.   OnKeyPress = FormKeyPress
  18.   TextHeight = 16
  19.   object Panel1: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 125
  23.     Height = 149
  24.     BevelInner = bvLowered
  25.     Color = clBlack
  26.     TabOrder = 0
  27.     object S7: TSpeedButton
  28.       Left = 26
  29.       Top = 50
  30.       Width = 25
  31.       Height = 25
  32.       Caption = '7'
  33.       Enabled = False
  34.       Spacing = 2
  35.       OnClick = AddValueofButton
  36.     end
  37.     object S8: TSpeedButton
  38.       Left = 50
  39.       Top = 50
  40.       Width = 25
  41.       Height = 25
  42.       Caption = '8'
  43.       Enabled = False
  44.       OnClick = AddValueofButton
  45.     end
  46.     object S4: TSpeedButton
  47.       Left = 26
  48.       Top = 74
  49.       Width = 25
  50.       Height = 25
  51.       Caption = '4'
  52.       Enabled = False
  53.       OnClick = AddValueofButton
  54.     end
  55.     object S5: TSpeedButton
  56.       Left = 50
  57.       Top = 74
  58.       Width = 25
  59.       Height = 25
  60.       Caption = '5'
  61.       Enabled = False
  62.       OnClick = AddValueofButton
  63.     end
  64.     object S1: TSpeedButton
  65.       Left = 26
  66.       Top = 98
  67.       Width = 25
  68.       Height = 25
  69.       Caption = '1'
  70.       Enabled = False
  71.       Spacing = 2
  72.       OnClick = AddValueofButton
  73.     end
  74.     object S2: TSpeedButton
  75.       Left = 50
  76.       Top = 98
  77.       Width = 25
  78.       Height = 25
  79.       Caption = '2'
  80.       Enabled = False
  81.       OnClick = AddValueofButton
  82.     end
  83.     object S0: TSpeedButton
  84.       Left = 26
  85.       Top = 122
  86.       Width = 25
  87.       Height = 25
  88.       Caption = '0'
  89.       Enabled = False
  90.       OnClick = AddValueofButton
  91.     end
  92.     object DP: TSpeedButton
  93.       Left = 50
  94.       Top = 122
  95.       Width = 25
  96.       Height = 25
  97.       Caption = '.'
  98.       Enabled = False
  99.       Font.Color = clBlack
  100.       Font.Height = -21
  101.       Font.Name = 'Arial'
  102.       Font.Style = [fsBold]
  103.       ParentFont = False
  104.       OnClick = AddValueofButton
  105.     end
  106.     object S9: TSpeedButton
  107.       Left = 74
  108.       Top = 50
  109.       Width = 25
  110.       Height = 25
  111.       Caption = '9'
  112.       Enabled = False
  113.       Spacing = 2
  114.       OnClick = AddValueofButton
  115.     end
  116.     object Plus: TSpeedButton
  117.       Left = 98
  118.       Top = 50
  119.       Width = 25
  120.       Height = 25
  121.       Caption = '+'
  122.       OnClick = ClickanOperation
  123.     end
  124.     object S6: TSpeedButton
  125.       Left = 74
  126.       Top = 74
  127.       Width = 25
  128.       Height = 25
  129.       Caption = '6'
  130.       Enabled = False
  131.       OnClick = AddValueofButton
  132.     end
  133.     object Minus: TSpeedButton
  134.       Left = 98
  135.       Top = 74
  136.       Width = 25
  137.       Height = 25
  138.       Caption = '-'
  139.       Font.Color = clBlack
  140.       Font.Height = -19
  141.       Font.Name = 'MS Sans Serif'
  142.       Font.Style = []
  143.       ParentFont = False
  144.       OnClick = ClickanOperation
  145.     end
  146.     object S3: TSpeedButton
  147.       Left = 74
  148.       Top = 98
  149.       Width = 25
  150.       Height = 25
  151.       Caption = '3'
  152.       Enabled = False
  153.       Spacing = 2
  154.       OnClick = AddValueofButton
  155.     end
  156.     object Multiply: TSpeedButton
  157.       Left = 98
  158.       Top = 98
  159.       Width = 25
  160.       Height = 25
  161.       Caption = 'x'
  162.       Font.Color = clBlack
  163.       Font.Height = -13
  164.       Font.Name = 'Arial'
  165.       Font.Style = [fsBold]
  166.       ParentFont = False
  167.       OnClick = ClickanOperation
  168.     end
  169.     object Equals: TSpeedButton
  170.       Left = 74
  171.       Top = 122
  172.       Width = 25
  173.       Height = 25
  174.       Caption = '='
  175.       Font.Color = clBlack
  176.       Font.Height = -19
  177.       Font.Name = 'MS Sans Serif'
  178.       Font.Style = [fsBold]
  179.       ParentFont = False
  180.       OnClick = ClickanOperation
  181.     end
  182.     object Divide: TSpeedButton
  183.       Left = 98
  184.       Top = 122
  185.       Width = 25
  186.       Height = 25
  187.       Caption = '/'
  188.       OnClick = ClickanOperation
  189.     end
  190.     object Cancel: TSpeedButton
  191.       Left = 2
  192.       Top = 74
  193.       Width = 25
  194.       Height = 25
  195.       Glyph.Data = {
  196.         66010000424D6601000000000000760000002800000014000000140000000100
  197.         040000000000F000000000000000000000000000000010000000000000000000
  198.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  199.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  200.         3333333300003333333333333333333300003333773333333333333300003339
  201.         1173333397333333000033391117333911733333000033391111739111173333
  202.         0000333391111711111733330000333339111111117333330000333333911111
  203.         1733333300003333333111117333333300003333333911117333333300003333
  204.         3391111173333333000033333911171117333333000033339111739111733333
  205.         0000333391173339111733330000333339133333911173330000333333333333
  206.         3919333300003333333333333333333300003333333333333333333300003333
  207.         33333333333333330000}
  208.       OnClick = CancelClick
  209.     end
  210.     object Clear: TSpeedButton
  211.       Left = 2
  212.       Top = 98
  213.       Width = 25
  214.       Height = 25
  215.       Glyph.Data = {
  216.         56070000424D5607000000000000360400002800000028000000140000000100
  217.         0800000000002003000000000000000000000000000000000000000000000000
  218.         80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  219.         A600000000000000000000000000000000000000000000000000000000000000
  220.         0000000000000000000000000000000000000000000000000000000000000000
  221.         0000000000000000000000000000000000000000000000000000000000000000
  222.         0000000000000000000000000000000000000000000000000000000000000000
  223.         0000000000000000000000000000000000000000000000000000000000000000
  224.         0000000000000000000000000000000000000000000000000000000000000000
  225.         0000000000000000000000000000000000000000000000000000000000000000
  226.         0000000000000000000000000000000000000000000000000000000000000000
  227.         0000000000000000000000000000000000000000000000000000000000000000
  228.         0000000000000000000000000000000000000000000000000000000000000000
  229.         0000000000000000000000000000000000000000000000000000000000000000
  230.         0000000000000000000000000000000000000000000000000000000000000000
  231.         0000000000000000000000000000000000000000000000000000000000000000
  232.         0000000000000000000000000000000000000000000000000000000000000000
  233.         0000000000000000000000000000000000000000000000000000000000000000
  234.         0000000000000000000000000000000000000000000000000000000000000000
  235.         0000000000000000000000000000000000000000000000000000000000000000
  236.         0000000000000000000000000000000000000000000000000000000000000000
  237.         0000000000000000000000000000000000000000000000000000000000000000
  238.         0000000000000000000000000000000000000000000000000000000000000000
  239.         0000000000000000000000000000000000000000000000000000000000000000
  240.         0000000000000000000000000000000000000000000000000000000000000000
  241.         0000000000000000000000000000000000000000000000000000000000000000
  242.         0000000000000000000000000000000000000000000000000000000000000000
  243.         0000000000000000000000000000000000000000000000000000000000000000
  244.         0000000000000000000000000000000000000000000000000000000000000000
  245.         0000000000000000000000000000000000000000000000000000000000000000
  246.         0000000000000000000000000000000000000000000000000000000000000000
  247.         0000000000000000000000000000000000000000000000000000000000000000
  248.         000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
  249.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
  250.         0303030303030303030303030303030303030303030303030303030303030303
  251.         0303030303030303030303030303030303030303030303030303030303030303
  252.         0303030303030303030303030303030303030303030303030303030303030303
  253.         030303030303030303030303030303030303FF030303FF030303030303030303
  254.         0303030303030303030303030303030303030303030303030303FF0303FFFFFF
  255.         0303FF0303030303030303030303030303030303030303030303030303030303
  256.         0303FFFFFFFFFFFFFFFFFFFF03030303030303030303030303030303030303FF
  257.         FFFFFF03030303030303FFFFFFFFFFFFFFFFF801010103030303030303030303
  258.         030303030303F8F8F8F8FFFF030303030303FFFFFFFFFFFFFFF8F9FDFD050103
  259.         03030303030303030303030303F8FF0303F8F8FFFF0303030303FFFFFFFFFFFF
  260.         FFF9FDF9FDFD050103030303030303030303030303F8FF030303F8F8FFFF0303
  261.         0303FFFFFFFFFFFF03FDF9FFF9FDFD0500030303030303030303030303F8FF03
  262.         030303F8F8FFFF030303FFFF03FFFFFF03F9FDFFFDF9FD000600030303030303
  263.         0303030303F803FF030303F8F8F8FFFF0303FF030303FF030303F9FDFFFD0002
  264.         0406000303030303030303030303F803FF03F8F8F8F8F8FFFF03FF0303030303
  265.         030303F9FD00FA02020406000303030303030303030303F803F803F8F8F8F8F8
  266.         FFFF0303030303030303030300FAFBFA020200F8000303030303030303030303
  267.         F803FF03F8F8F8F8F8FF030303030303030303030300FAFBFA0004F8F8000303
  268.         030303030303030303F803FF03F8F8F8F8F803030303030303030303030300FA
  269.         0007FB04F8F8030303030303030303030303F803F80303F8F8F8030303030303
  270.         030303030303030007FFFBFB04F803030303030303030303030303F803FF0303
  271.         F8F8030303030303030303030303030300FFFFFBFB0403030303030303030303
  272.         03030303F803FF0303F803030303030303030303030303030300FFFFFBFB0303
  273.         03030303030303030303030303F803FF03030303030303030303030303030303
  274.         030300FFFFFB03030303030303030303030303030303F8030303}
  275.       NumGlyphs = 2
  276.       OnClick = ClearClick
  277.     end
  278.     object Display: TLabel
  279.       Left = 107
  280.       Top = 6
  281.       Width = 9
  282.       Height = 16
  283.       Alignment = taRightJustify
  284.       Caption = '0'
  285.       Color = clBlack
  286.       DragMode = dmAutomatic
  287.       Font.Color = clLime
  288.       Font.Height = -13
  289.       Font.Name = 'MS Sans Serif'
  290.       Font.Style = [fsBold]
  291.       ParentColor = False
  292.       ParentFont = False
  293.     end
  294.     object OK: TSpeedButton
  295.       Left = 2
  296.       Top = 50
  297.       Width = 25
  298.       Height = 25
  299.       Glyph.Data = {
  300.         66010000424D6601000000000000760000002800000014000000140000000100
  301.         040000000000F000000000000000000000000000000010000000000000000000
  302.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  303.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  304.         3333333300003333333333333333333300003333333333333333333300003333
  305.         3344333333333333000033333422433333333333000033334222243333333333
  306.         0000333422222243333333330000334222A2222433333333000033222A3A2224
  307.         33333333000033A2A333A222433333330000333A33333A222433333300003333
  308.         333333A222433333000033333333333A222433330000333333333333A2224333
  309.         00003333333333333A222433000033333333333333A224330000333333333333
  310.         333A223300003333333333333333A33300003333333333333333333300003333
  311.         33333333333333330000}
  312.       OnClick = OKClick
  313.     end
  314.     object MemoryAdd: TSpeedButton
  315.       Left = 26
  316.       Top = 26
  317.       Width = 25
  318.       Height = 25
  319.       Caption = 'M+'
  320.       Font.Color = clBlack
  321.       Font.Height = -11
  322.       Font.Name = 'MS Sans Serif'
  323.       Font.Style = [fsBold]
  324.       ParentFont = False
  325.       OnClick = ClickanOperation
  326.     end
  327.     object MemorySubtract: TSpeedButton
  328.       Left = 50
  329.       Top = 26
  330.       Width = 25
  331.       Height = 25
  332.       Caption = 'M-'
  333.       Font.Color = clBlack
  334.       Font.Height = -11
  335.       Font.Name = 'MS Sans Serif'
  336.       Font.Style = [fsBold]
  337.       ParentFont = False
  338.       OnClick = ClickanOperation
  339.     end
  340.     object MemoryRead: TSpeedButton
  341.       Left = 74
  342.       Top = 26
  343.       Width = 25
  344.       Height = 25
  345.       Caption = 'MR'
  346.       Font.Color = clBlack
  347.       Font.Height = -11
  348.       Font.Name = 'MS Sans Serif'
  349.       Font.Style = [fsBold]
  350.       ParentFont = False
  351.       OnClick = MemoryReadClick
  352.     end
  353.     object MemoryClear: TSpeedButton
  354.       Left = 98
  355.       Top = 26
  356.       Width = 25
  357.       Height = 25
  358.       Caption = 'MC'
  359.       Font.Color = clBlack
  360.       Font.Height = -11
  361.       Font.Name = 'MS Sans Serif'
  362.       Font.Style = [fsBold]
  363.       ParentFont = False
  364.       OnClick = MemoryClearClick
  365.     end
  366.     object MemLabel: TLabel
  367.       Left = 2
  368.       Top = 2
  369.       Width = 6
  370.       Height = 8
  371.       Caption = 'M'
  372.       Color = clBlack
  373.       Font.Color = clYellow
  374.       Font.Height = -7
  375.       Font.Name = 'Small Fonts'
  376.       Font.Style = []
  377.       ParentColor = False
  378.       ParentFont = False
  379.     end
  380.     object OpLabel: TLabel
  381.       Left = 115
  382.       Top = 9
  383.       Width = 6
  384.       Height = 16
  385.       Caption = '+'
  386.       Color = clBlack
  387.       Font.Color = clLime
  388.       Font.Height = -13
  389.       Font.Name = 'MS Serif'
  390.       Font.Style = []
  391.       ParentColor = False
  392.       ParentFont = False
  393.     end
  394.     object SignChange: TSpeedButton
  395.       Left = 2
  396.       Top = 26
  397.       Width = 25
  398.       Height = 25
  399.       Caption = '+/-'
  400.       OnClick = SignChangeClick
  401.     end
  402.     object SpinButton1: TSpinButton
  403.       Left = 2
  404.       Top = 122
  405.       Width = 25
  406.       Height = 25
  407.       DownGlyph.Data = {
  408.         A6000000424DA600000000000000760000002800000009000000060000000100
  409.         0400000000003000000000000000000000000000000000000000000000000000
  410.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  411.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
  412.         0000333303333000000033300033300000003300000330000000300000003000
  413.         00003333333330000000}
  414.       TabOrder = 0
  415.       UpGlyph.Data = {
  416.         A6000000424DA600000000000000760000002800000009000000060000000100
  417.         0400000000003000000000000000000000000000000000000000000000000000
  418.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  419.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333000
  420.         0000300000003000000033000003300000003330003330000000333303333000
  421.         00003333333330000000}
  422.       OnDownClick = SpinButton1DownClick
  423.       OnUpClick = SpinButton1UpClick
  424.     end
  425.   end
  426. end
  427.