[ecfisa]

Empezado por cmfab

Gracias por la pronta respuesta pero lo que tengo es el nombre del campo. como accedo al index ?

Hola.

Una forma podría ser:

Código Delphi [-]
function GetIndex(Grid: TDBGrid; Nombre: string): Integer;
var
  i: Integer;
begin
  Result:= -1;
  for i:= 0 to Grid.FieldCount -1 do
    if Nombre = Grid.Fields[i].FieldName then
    begin
      Result:= i;
      Exit;
    end;
end;

Ejemplo de llamada:

Código Delphi [-]
...
var
  Inx: Integer;
begin
  Inx:= GetIndex2(DBGrid1,'nombre_del_campo');
  if Inx > -1 then  
  ...

Aunque en tu caso la verificación del if > -1, es innecesaria por que se supone que el nombre de campo lo obtenes de un DataSet...

Saludos.