Gracias por tu respuesta.
Si pongo :
Código PHP:
TTable.FindKey([Nombre.Text]) Then
Codigo.Text := TTable.Fields[0].AsFloat;
al compilar me da el siguiente error : 'Imcompatible types String and Double'.
Por eso pido ayuda para poder hacerlo de otra manera, porque a la verdad no se como hacerlo.
Gracias por tu ayuda.
Pd : las comas fueron un lapsus.