Vezető nullák hozzáadása számhoz (Delphi formátum)

A különféle alkalmazásokhoz speciális értékek szükségesek ahhoz, hogy megfeleljenek a szerkezeti paradigmáknak. Például a társadalombiztosítási számok mindig kilenc számjegyből állnak. Egyes jelentések megkövetelik, hogy a számokat rögzített karakterekkel jelenítsék meg. Például a sorozatszámok általában 1-gyel kezdődnek, és vég nélkül növekményesek, tehát a kezdő nullákkal jelennek meg, hogy vizuális vonzereje legyen.

Mint a Delphi programozó, az a módszer, ahogyan egy számot hozzáad a vezető nullákhoz, az adott érték konkrét felhasználási esetétől függ. Egyszerűen kiválaszthatja a megjelenítési érték padlását, vagy konvertálhat egy számot karakterlánccá az adatbázisban történő tároláshoz.

Kijelző padding módszer

Használjon egy egyszerű funkciót a szám megjelenítésének megváltoztatásához. Használat formátum hogy átalakítson egy érték megadásával hossz (a végső kimenet teljes hossza) és a betáplálni kívánt szám:

str: = formátum ('%. * d, [hossz, szám])

A 7-es szám két első nullával történő kitöltéséhez dugja be ezeket az értékeket a kódba:

instagram viewer
str: = formátum ('%. * d, [3, 7]);

Az eredmény: 007 az értéket karakterláncként adják vissza.

Konvertálás karakterlánc-módszerre

Használjon kitöltési funkciót a kezdő nullák (vagy bármely más karakter) hozzáfűzéséhez, amikor csak szüksége van rá a szkriptbe. A már egész számok átalakításához használja:

LeftPad függvény (érték: egész szám; hosszúság: egész szám = 8; pad: char = '0'): húr; túlterhelés; 

kezdődik

 eredmény: = RightStr (StringOfChar (pad, hossz) + IntToStr (érték), hossz); 

végén;

Ha a konvertálandó érték már egy karakterlánc, akkor használja:

LeftPad függvény (érték: karakterlánc; hosszúság: egész szám = 8; pad: char = '0'): húr; túlterhelés;

kezdődik

 eredmény: = RightStr (StringOfChar (pad, hossz) + érték, hossz);

végén;

Ez a megközelítés működik együtt Delphi 6 és újabb kiadások. Mindkét kódblokk alapértelmezés szerint egy padding karakter 0 hét visszafordított karakter hosszúságú; ezeket az értékeket módosíthatja az Ön igényei szerint.

Amikor a LeftPad meghívásra kerül, akkor az értéke a megadott paradigma szerint tér vissza. Például, ha egy egész értéket 1234-re állít be, hívja a LeftPad-ot:

i: = 1234;
r: = LeftPad (i);

visszaad egy string értéket 0001234.