Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.23;
Скачать: CL | DM;

Вниз

Как отформатировать число чтобы вывести его с ведущими нулями?   Найти похожие ветки 

 
kserg@ukr.net   (2002-05-14 17:05) [0]

спасибо


 
Anatoly Podgoretsky ©   (2002-05-14 17:12) [1]

Форматная строка с нужным количеством нулей


 
kserg@ukr.net   (2002-05-14 17:14) [2]

спасибо :(


 
Johnmen ©   (2002-05-14 17:20) [3]

Куда вывести-то ?


 
kserg@ukr.net   (2002-05-14 17:22) [4]

в строку, т.е на экран :)


 
Johnmen ©   (2002-05-14 17:29) [5]

В каком компоненте отображается ?


 
Alx2 ©   (2002-05-14 17:33) [6]


Function MyIntTostr(Value, len: Integer): String;
Begin
Result := IntToStr(Value);
Result := StringOfChar("0", len - Length(Result)) + Result;
End;

len - требуемая символьная длина числа (недостающие позиции заполняются ведущими пробелами).


 
kserg@ukr.net   (2002-05-14 17:36) [7]

>Johnmen © (14.05.02 17:29)
В каком компоненте отображается ?

TLabel



 
Alx2 ©   (2002-05-14 17:38) [8]

>kserg@ukr.net (14.05.02 17:36)
Label1.Caption := MyIntToStr(23,4);
Присвоится: Label1.Caption = 0023


 
Johnmen ©   (2002-05-14 17:42) [9]

типа FormatFloat("0000000.00",<>)


 
MBo ©   (2002-05-14 18:11) [10]

label1.caption:=formatfloat("0000",17);



Страницы: 1 вся ветка

Текущий архив: 2002.05.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.011 c
3-72992
Abu
2002-04-25 10:42
2002.05.23
ADODataSet или ADOQuery возвращает пустой набор


4-73461
medan
2002-03-18 12:06
2002.05.23
закрытие всех окон без вопросов


4-73435
sammy
2002-03-19 08:25
2002.05.23
Как закрыть другое приложение?


4-73441
AlexSK
2002-03-20 12:38
2002.05.23
выгрузка DLL


14-73358
Malder
2002-04-13 18:31
2002.05.23
Голос Бритни обращает в бегство диких немецких кабанов