Maska dla DBEdita

Może ktoś wie jak zrobić maskę dla kontrolki DBEdit (która odwołuje się do bazy danych) żeby można było wpisywać wyłącznie cyfry. Chodzi mi o cos podonego jak w kontrolce TMaskEdir. Mam Delphi 7.
Dzięci za wszelkie uwagi [!!!]
;P

Zaprogramuj metodę onKeyPress dla tego komponentu - która wszystkie znaki oprócz cyfr i backspace będzie zamieniać na znaki o numerze 0 czyli faktyczny brak znaku:)

coś w tym stylu - #8 to chyba backspace

if )(Key<'0') or (Key>'9')) and (Key<>#8)then
   Key:=#0;

Dzięki [!!!]
"W to mi graj" :)