Hola..
Buenissimo el codigo del compañero Roman, pero si solo es en un Edit, podrias utilizar esto...
Código Delphi
[-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
IF Key=#13 THEN
BEGIN
Key:=#0; END;
end;
espero que te sirva....