Limit data Entry to stop no entry

Im using Delphi 1.
I have a data entry routine but I want to stop users entering no
information and return
them back to the entry point asking them to put a correct entry in.

I also have one entry routine that must only have numeric input.