cmoneyinpedt.dfm

Delphi功能强的DBGRID构件,支持钱币网格,从DBGRIDEH中继承.比速达的网格构件功能更强大.

object frmPopCalculator: TfrmPopCalculator
  Left = 379
  Top = 321
  BorderStyle = bsNone
  Caption = #35745#31639#22120
  ClientHeight = 143
  ClientWidth = 223
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  PixelsPerInch = 96
  TextHeight = 12
  object pnlCalculator: TPanel
    Tag = 6
    Left = 0
    Top = 0
    Width = 223
    Height = 143
    Align = alClient
    BevelInner = bvLowered
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object spbC: TSpeedButton
      Left = 153
      Top = 3
      Width = 67
      Height = 24
      Caption = 'C'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbCEClick
    end
    object spbCE: TSpeedButton
      Left = 78
      Top = 3
      Width = 67
      Height = 24
      Caption = 'CE'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbCEClick
    end
    object spbBack: TSpeedButton
      Left = 3
      Top = 3
      Width = 67
      Height = 24
      Caption = '<-'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbBackClick
    end
    object spbPercent: TSpeedButton
      Tag = 5
      Left = 181
      Top = 61
      Width = 39
      Height = 24
      Caption = '%'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OperatorButtonClick
    end
    object spbDiv: TSpeedButton
      Tag = 4
      Left = 137
      Top = 34
      Width = 39
      Height = 24
      Caption = '/'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OperatorButtonClick
    end
    object spbRide: TSpeedButton
      Tag = 3
      Left = 137
      Top = 61
      Width = 39
      Height = 24
      Caption = '*'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OperatorButtonClick
    end
    object spbDec: TSpeedButton
      Tag = 2
      Left = 137
      Top = 89
      Width = 39
      Height = 24
      Caption = '-'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OperatorButtonClick
    end
    object spbInc: TSpeedButton
      Tag = 1
      Left = 137
      Top = 116
      Width = 39
      Height = 24
      Caption = '+'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OperatorButtonClick
    end
    object spbEnter: TSpeedButton
      Left = 181
      Top = 116
      Width = 39
      Height = 24
      Caption = '='
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      NumGlyphs = 2
      ParentFont = False
      OnClick = spbEnterClick
    end
    object spb0: TSpeedButton
      Left = 3
      Top = 116
      Width = 39
      Height = 24
      Caption = '0'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spbDot: TSpeedButton
      Left = 92
      Top = 116
      Width = 39
      Height = 24
      Caption = '.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbDotClick
    end
    object spb5: TSpeedButton
      Tag = 5
      Left = 48
      Top = 61
      Width = 39
      Height = 24
      Caption = '5'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb4: TSpeedButton
      Tag = 4
      Left = 3
      Top = 61
      Width = 39
      Height = 24
      Caption = '4'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb1: TSpeedButton
      Tag = 1
      Left = 3
      Top = 89
      Width = 39
      Height = 24
      Caption = '1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb2: TSpeedButton
      Tag = 2
      Left = 48
      Top = 89
      Width = 39
      Height = 24
      Caption = '2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb3: TSpeedButton
      Tag = 3
      Left = 92
      Top = 89
      Width = 39
      Height = 24
      Caption = '3'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb6: TSpeedButton
      Tag = 6
      Left = 92
      Top = 61
      Width = 39
      Height = 24
      Caption = '6'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb8: TSpeedButton
      Tag = 8
      Left = 48
      Top = 34
      Width = 39
      Height = 24
      Caption = '8'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb7: TSpeedButton
      Tag = 7
      Left = 3
      Top = 34
      Width = 39
      Height = 24
      Caption = '7'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spb9: TSpeedButton
      Tag = 9
      Left = 92
      Top = 34
      Width = 39
      Height = 24
      Caption = '9'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = NumberButtonClick
    end
    object spbSqrt: TSpeedButton
      Left = 181
      Top = 34
      Width = 39
      Height = 24
      Caption = 'sqrt'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbSqrtClick
    end
    object spbCross: TSpeedButton
      Left = 181
      Top = 89
      Width = 39
      Height = 24
      Caption = '1/x'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbCrossClick
    end
    object spbNegative: TSpeedButton
      Left = 48
      Top = 116
      Width = 39
      Height = 24
      Caption = '+/-'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = spbNegativeClick
    end
  end
end