Numberdialog gibt bei mir keine Nachkommastellen aus.
Obwohl ich "nd.decimal = 4" gesetzt habe.
Gebe ich ind die SUB unten "1,0001" ein erhalte ich "10001" als LabelAusgabe.
Hat jemand ne Lösung dafür?
lg Frank
B4X:
Sub diaEndpunktX_click'()
'Dim i As Double
Dim nd As NumberDialog
nd.Digits = 10
nd.Number = 0.0000
nd.Decimal = 4
'nd.DecimalChar = ","
nd.ShowSign = True
nd.Show("Endpunkt X", "Übernehmen", "", "",Null)
'nd.Decimal =4
lblEndpunktX.Text = "X" & nd.Number
'lblEndpunktX.Text = "X" & NumberFormat2(nd.Number, 0, 4, 4, False)
End Sub
Digits:
One is the minimum, nine is the maximum.
nd.Digits maximal 9 !
"Note that the number accepted and returned by the dialog is an integer value and so may need scaling appropriately."
Die zurückgegebene Zahl ist ein Integer die dann wieder umgerechnet werden muss.
B4X:
lblEndpunktX.Text = "X" & nd.Number / Power(10, nd.Decimal)