Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.56/16: Рейтинг темы: голосов - 16, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 31.10.2010
Сообщений: 18
1

Как подставить в счетчике нули перед цифрой

31.10.2010, 22:19. Показов 3210. Ответов 2
Метки нет (Все метки)

v:=StrToInt(Edit2.Text);
for i:=1 to v do
begin
Memo1.Lines.Add(IntToStr(i));
end;

В поле едит2 заданно 100, соответственно строки добавляются 1..100, как сделать 001..100? Или если в едит2 задам 1000 или 10000, чтобы автоматом было 0001..1000 и 00001..10000
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
31.10.2010, 22:19
Ответы с готовыми решениями:

Строка: вставить перед цифрой букву, стоящую за цифрой
Задана строка из латинских букв и цфир. Вставить перел цифрой букау, стоящую за цифрой

Названия папок. Как добавить нули перед цифрами?
echo off set /p input= Vvedite kolichestvo papok : for /l %%i in (1,1,%input%) do md "%cd%/%%i"...

Перевод десятичного числа в двоичное. Как удалить нули перед первой еденицей?
Вот прога преобразующая десятичное число в двоичное: #include <iostream> int main() int...

Пробел перед цифрой
есть файл с массивом ,я хочу поставить пробел перед всеми цифрами и передать на функцию explode()....

2
Добрый самаритянин
1107 / 622 / 139
Регистрация: 31.03.2009
Сообщений: 2,568
31.10.2010, 22:54 2
добавлять в начало Length(edit2.text) - length(IntToStr(i)) нулей
0
22 / 22 / 3
Регистрация: 27.07.2010
Сообщений: 71
01.11.2010, 00:35 3
Лучший ответ Сообщение было отмечено Finogenov как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
var
  sBuf   : AnsiString;
  iCount : Integer;
begin
  iCount := StrToInt( Edit2.Text );
  for  i := 1 to iCount do
  begin
    sBuf := IntToStr( i );
    while ( Length( sBuf ) < 3 ) do sBuf := '0' + sBuf;
    Memo1.Lines.Add( sBuf );
  end;
end;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.11.2010, 00:35

Помощь в написании контрольных, курсовых и дипломных работ здесь.

вставка буквы перед цифрой
добрый день!ни как не могу найти ответ на вопрос.вот часть кода i1 = 1 ..... Rs2!iKEY = i1 ...

Подставить цифру перед цифровыми значениями в таблице
В таблице много номеров сотовых телефонов в формате 9ХХХХХХХХХ, а нужно ,чтобы было в формате...

Заменить пробел перед цифрой на двоеточие
А не подскажите, как заменить последовательность пробел+цифра на двоеточие+эту цифру? Например...

Перед первой найденной цифрой записать слово first
Дано натуральное число n и строка символов s1 .. sn . Вывести данные символы на печать, а также...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.