| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отформатировать число чтобы вывести его с ведущими нулями?
kserg@ukr.net © (2002-05-14 17:05:00)спасибо
MBo (2002-05-14 18:11:00) [1]label1.caption:=formatfloat("0000",17);
Johnmen (2002-05-14 17:42:00) [2]типа FormatFloat("0000000.00",<>)
Alx2 (2002-05-14 17:38:00) [3]>kserg@ukr.net (14.05.02 17:36)
Label1.Caption := MyIntToStr(23,4);
Присвоится: Label1.Caption = 0023
kserg@ukr.net (2002-05-14 17:36:00) [4]>Johnmen © (14.05.02 17:29)
В каком компоненте отображается ?
TLabel
Alx2 (2002-05-14 17:33:00) [5]
Function MyIntTostr(Value, len: Integer): String;
Begin
Result := IntToStr(Value);
Result := StringOfChar("0", len - Length(Result)) + Result;
End;
len - требуемая символьная длина числа (недостающие позиции заполняются ведущими пробелами).
Johnmen (2002-05-14 17:29:00) [6]В каком компоненте отображается ?
kserg@ukr.net (2002-05-14 17:22:00) [7]в строку, т.е на экран :)
Johnmen (2002-05-14 17:20:00) [8]Куда вывести-то ?
kserg@ukr.net (2002-05-14 17:14:00) [9]спасибо :(
Anatoly Podgoretsky (2002-05-14 17:12:00) [10]Форматная строка с нужным количеством нулей
| |
