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