Hola L3st4t.
Por favor te ruego que uses las etiquetas [delphi] [/delphi] para encerrar tu código Delphi. (
Etiquetas vB )
Creo que deberías hacer algo como:
Código Delphi
[-]
...
if DataM.T_Clientes.Locate('FC_CODIGO', Edit1.Text, []) then
ShowMessage('Codigo Encontrado')
else
ShowMessage('Codigo No Existe');
...
No sé con que componentes estas trabajando ya que también se puede hacer mediante una consulta SQL.
Un saludo.