|
![]() |
#1 |
Участник
|
Задача: на входе Decimal. Надо получить строку длиной именно 10 символов, где оставшиеся разряды добиваются нулями. Т.е. например
123.45 -> 123.450000 20.1 -> 20.1000000 1.3 -> 1.30000000 500 -> 500.000000 и т.д. Что-то никак не пойму как сделать. ![]() |
|
![]() |
#2 |
Участник
|
Сдается мне что придется определять длину полученной строки и добивать вручную программно.
__________________
Want to believe... |
|
![]() |
#3 |
Участник
|
Да, пожалуй, считать
|
|
![]() |
#4 |
Moderator
|
не надо ничего считать
Код: DecimalNumber := 123.45; TextResult := COPYSTR(DELCHR(FORMAT(DecimalNumber,0,'<Integer,20><Decimals,20>'),'<',' '),1,10); |
|
![]() |
#5 |
Участник
|
Спасибо большое!
|
|
![]() |
#6 |
Участник
|
cool.
__________________
Want to believe... |
|
![]() |
#7 |
Участник
|
Или еще проще:
Код: result:=padstr(format(DecimalValue),10,'0') |
|
![]() |
#8 |
Участник
|
Прошлый способ для целых не проходит, поэтому все-таки так, наверно самый простой способ
Код: result:=copystr(format(a,0,'<Integer,0><decimals,20>'),1,10) |
|