Карта сайтаСсылкиКонтакты

Как добавить незначащие нули в число

PDF Печать
Статьи
Программирование Delphi http://delphiru.ru

Здесь мы рассмотрим, как можно преобразовать целое число в строку, добавив к этому числу незначащие нули.

Допустим, что Вы разрабатываете приложение с базой данных и должны сохранить номер клиента, где каждое число должно быть длиной 10 знаков. Но если начинать сначала, то клиенты будут с номерами 2,4,7 и т.д., то есть меньше, чем 10 знаков.

Давайте напишем функцию AddLeadZero, которой будет передаваться два параметра: Number - число, к которому будем добавлять нули; Length - общее количество символов (если меньше, добавить нули).


function AddLeadZero (
      const Number, Length : integer) : string;
 begin
    result := SysUtils.Format('%.*d', [Length, Number]) ;
 end;

Как использовать:


AddLeadZero(7, 10);

В результате мы получим девять нулей и на конце семерку (0000000007).

По материалам About.com


 

Комментарии   

 
0 #1 elamed.info 24.04.2017 12:40
Pretty! This was a really wonderful post. Many thanks for supplying these details.
Цитировать
 

Добавить комментарий


Защитный код
Обновить