In meinem D2005 gibts in der Palettenseite zusätzlich die Komponente TMaskEdit, da kann man das einfach einstellen.
Wenn es die Kompo bei dir nicht gibt, dann musst du das OnKeyPress-event des Edits verwenden.
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
const erlaubteZeichen:set of char=['0'..'9']; //<--Die Zeichen, die du erlauben willst
begin
if not (key in erlaubteZeichen) then
key:=#0; //<--key wird ungültig gemacht
end;