Código Delphi
[-]
if not tablaDeMorosos.Locate('NOMBRE EMPRESA',EDIT1.TEXT,[loCaseInsensitive, loPartialKey] then
edit1.font.color := clRed else
edit1.font.color := clBlack;
Puede que necesites los corchetes al pasar el nombre del campo en Access.
Si el grid está asociado a la tablaDeMorosos, entonces directamente te seleccionará la coincidencia.
Saludos