TIsahDBCalculatorEdit

This control is derived from TDBEdit. Contains a calculator widget to enter numeric data.

Code Snippet

Set idbcalcedtFieldNumeric = IsahObjects.Get("TIsahDBCalculatorEdit")

With idbcalcedtFieldNumeric

.Parent = grpbxFields

.Name = "idbcalcedtFieldNumeric"

.Left = 76

.Top = 76

.Width = 120

.Height = 21

.DataField = "FieldNumeric"

.DataSource = frmEditForm.dsMain

.TabOrder = 3

.Alignment = 1

.AllowNegative = 0

.Precision = 0

.Decimals = 2

.ShowButton = 1

.Freeonrelease=0

End With