Различите апликације захтијевају одређене вриједности да би се ускладиле са структуралним парадигмама. На пример, бројеви социјалног осигурања увек су девет цифара. Неки извештаји захтевају да се бројеви прикажу са фиксном количином знакова. Бројеви секвенци, на пример, обично почињу са 1 и прираст без краја, па су приказани са водећим нулама да би приказали визуелну привлачност.
Као Делпхи програмер, ваш приступ додавању броја водећим нулама зависи од конкретног случаја употребе за ту вредност. Једноставно се можете одлучити за подешавање приказане вредности или број можете претворити у низ за чување у бази података.
Приказивање паддинг методе
Помоћу једноставне функције промените начин приказивања вашег броја. Употреба формат да бисте извршили конверзију пружањем вредности за дужина (укупна дужина коначног излаза) и број који желите да додате:
стр: = Формат ('%. * д, [дужина, број])
Да бисте закрпили број 7 са две водеће нуле, укључите их у код:
стр: = Формат ('%. * д, [3, 7]);
Резултат је 007 са вредности враћеном као низ.
Претвори у Стринг методу
Употријебите функцију паддинга да додате водеће нуле (или било који други знак) било када у сценарију. Да бисте претворили вредности које су већ цели бројеви, користите:
функција ЛефтПад (вредност: цели број; дужина: цели број = 8; пад: цхар = '0'): стринг; преоптерећење;
започети
резултат: = РигхтСтр (СтрингОфЦхар (пад, дужина) + ИнтТоСтр (вредност), дужина);
крај;
Ако је вредност за конверзију већ низ, користите:
функција ЛефтПад (вредност: стринг; дужина: цели број = 8; пад: цхар = '0'): стринг; преоптерећење;
започети
резултат: = РигхтСтр (СтрингОфЦхар (пад, дужина) + вредност, дужина);
крај;
Овај приступ функционише Делпхи 6 и касније издања. Оба ова кода блокирају подразумеване знакове за облагање од 0 у дужини од седамврата знакова; те вредности могу бити модификоване како би задовољиле ваше потребе.
Када се позове ЛефтПад, враћа вредности према наведеној парадигми. На пример, ако поставите целу вредност на 1234, позивајући ЛефтПад:
и: = 1234;
р: = ЛефтПад (и);
ће вратити вредност низа од 0001234.