Re: KwotaNaTekst - formatowanie wyniku, HMF 2016.
KwotaNaTekst jest wbudowanym poleceniem i nie mamy na niego wpływu więcej niż pozwala nam jego parametryzacja.
Parametr opis_jed ustala jednostkę (domyślnie "złote")
Możesz to zmienić dodając wpis do pliku
symfonia.ini i określić swoją jednostkę np. centymetry.
Kod:
[Kwoty tekstowo]
cm=0,centymetrów,centymetr,centymetry,0,milimetrów,milimetr,milimetry
w wyniku wywołania
Kod:
print KwotaNaTekst("20.27","cm")
otrzymujemy
dwadzieścia centymetrów dwadzieścia siedem milimetrówChcąc uzyskać Twój efekt po pierwsze musimy pozbyć się w ogóle jednostek używając jako parametr jednostki znaku
@Oddziel część całkowitą od ułamkowej. Całkowitą pokazać jako tekst a ułamkową jako x/100.
Kod:
string sub mixKwotaNaTekst(string sKwota, string sJedn)
string sUlamek
string sCale
buf = sKwota
sUlamek = delete regular ".{*}$"
sCale = buf
mixKwotaNaTekst = KwotaNaTekst( sCale,sJedn ) + mid(sUlamek,2,100) + "/100"
endsub
wywołując
Kod:
mixKwotaNaTekst("20.27", "@")
Otrzymujesz
dwadziećcia 27/100
(2)