Tengo éste código en la forma padre de mi proyecto:
procedure TDts.Edit; var i : Integer; begin clndsDts.Edit; for i := 0 to clndsDts.FieldCount - 1 do begin clndsDts.Fields[ i ].AsString := Trim( clndsDts.Fields[ i ].AsString ); end; end;
Buscando en la ayuda de Delphi 7, encontré el tipo de campo fkInternalCalc e intenté añadirlo a mi código:
procedure TDts.Edit; var i : Integer; begin clndsDts.Edit; for i := 0 to clndsDts.FieldCount - 1 do begin if clndsDts.Fields[ i ].FieldKind <> fkInternalCalc then clndsDts.Fields[ i ].AsString := Trim( clndsDts.Fields[ i ].AsString ); end; end;
Pero no me identifica el campo autoincrementable (Identity) de la tabla que estoy abriendo.
¿Alguna idea de cómo puedo identificar un campo autoincrementable de MS SQL Server 2005?