[Delphi] Komponent do wstawiania waluty ?

Witam !

Czy istnieje jakis komponent (cos w rodzaju Edit), ktory blokowalby wpisywanie liter, mozna byloby wpisywac tylko liczby, a poza tym dopisywalby na koniec wartosci ,00.
tak jak to jest przy wprowadzaniu jakiejs kwoty np. 1.000,00 ;)

Blokuj w OnKeyPress:

if not (Key in ['0'..'9']) then Key:=#0--Vogel [Delphi 6 PE]

Life is just a dream, you know...
[Cowboy Bebop]

TMaskEdit na zakładce Additional--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

OK ale jak wstawie if not (Key in ['0'..'9']) then Key:=#0 to nie dziala rowniez backspace, potrzebny np do usuniecia ktorejs cyfry z powodu bledu.
Prosze o podpowiedz co z tym zrobic ??? ;)

if not (Key in ['0'..'9', #8]) then Key:=#0 --__________________________________
Pozdrawiam...
piechnat

DZIEKI ! {brawo}