Delphi Zł w Edit bądz MaskEdit

[MiiszaLu]

Witam. Potrzebuje żeby w Edit wyświetlało mi sie np. 20,10zł bądz chociaż 20,10 . Chodzi o to żeby po przecinku nie wygladalo to tak : 20,1 , tylko były zawsze dwie liczby bo nim. Jak to zrobic ? Probowalem w MaskEdit, ale jeżeli zrobilem ___,__ to niedalo sie napisac 1000,00. Prosze o pomoc

[Regonos]

Może troche późno i bawię się w archeologa ale specjalnie dla ciebie napisałem taką funkcje bo mi się nudziło ;d

 

Kod:

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

 

sposób użycia:

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

 

gdzie:

To jest ukryta treść, proszę

• Zaloguj się
• lub
• Zarejestruj się

 

jeden - liczba(w stringu czyli w Edit)

dwa - ilosc zer które ma dodać(w stringu np '000' a w twoim przypadku '0')

trzy - jednostka(w stringu np 'zl')

 

Uwaga!:Kod nie zadziała gdy klikniesz drugi raz gdyż jest już dodana końcówka zl a jej nie da sie zamienic na liczbe.

Jeżeli bedziesz chciał zrobie ci wersje bez jednostki lub jednostke w osobnym labelu.

 

Pozdrawiam,

Regonos.