ojala sirva
Código Delphi
[-]
var iFileHandle: Integer; Buffer: byte; begin iFileHandle := FileOpen('tuarchivo.dbf', fmOpenWrite);
FileSeek(iFileHandle,0,0);
Buffer := 2; FileWrite(iFileHandle, buffer,sizeof(buffer));
FileClose(iFileHandle);
end;
end;
para más información de los tipos
aqui o directamente en
wotsit.org