Comparar y Validar Campos

[L3st4t]

Buenas tardes, Estoy super nuevo en esto de la programacion

Mi requerimiento es el siguiente estoy trabajando con una data de un sistema administrativo (base de datos DBISAM)y necesito una aplicación que lea el código del cliente en la tabla y el saldo (deuda) que posee el mismo, en estos momentos estoy comenzando con la búsqueda del cliente con el siguiente código:

Código Delphi [-]
Procedure TF_Clientes.VerificaCodigo;
var codigo : string;
begin
  With DataM.T_Clientes do
  begin
    codigo:= edit1.Text;
    IF  FieldByname('FC_CODIGO').AsString = codigo then
    begin
       ShowMessage('Codigo Encontrado');
    end
    else
    begin
      ShowMessage('Codigo No Existe');
    end;
  end;
end;

El detalle esta que solo valida el primer registro, no hallo como hacer una secuencia para que busque el código que digité en el edit.text

Me imagino que puede ser con un while o alguna sentencia como el LOCATE (no se si este ultimo lo acepta el DBISAM) pero no se como utilizarlo.

Disculpen y Gracias.