rad sa nulama prilikom matematickih operacija

Imam kod za pretvaranje brojeva u slova,tj iznosa necega u slova.....funkcija je currencystr.....
I imam problem kada je taj iznos koji treba da pretvori 0,treba da izadje 0,00,a izlazi greska invalid floating number value ili takjo nesto....i pojavi gresku na ovom delu koda...

If StrToFloat (S) = 0 Then
Result := 'nula dinara'
Else
...
...
...


Dakle pojavjuje error samo kada je nula.....
Kako to da izvedem,kada je 0 u pitanju.....

> Imam kod za pretvaranje brojeva u slova,tj iznosa necega u slova.....funkcija je currencystr.....
> I imam problem kada je taj iznos koji treba da pretvori 0,treba da izadje 0,00,a izlazi greska invalid floating number value ili takjo nesto....i pojavi gresku na ovom delu koda...

> If StrToFloat (S) = 0 Then
> Result := 'nula dinara'

Malo si nejasan oko pitanja, ako dobiješ invalid floating number grešku to znači da prosleđuješ neispravan broj, moguće je da stavljaš pogrešan decimalni zarez (npr. 0,00 a treba 0.00).

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Moguce da je kod pravljen pod Xp tako da je separator ",", u sedmici je separator "." tako da kod prijavljuje gresku.