Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Pues puedes hacerlo de dos formas. La primera es como en Pascal. Usas las funciones ReWrite(), Write(), Close(), etc. mírate la ayuda, y la otra forma es utilizar el componente TStringList, donde añades cadenas de caracteres y luego las puedes guardar en un archivo. Obviamente también las puedes recuperar del archivo con ese mismo objeto.
bueno la estructura para crear un archivo es la siguiente por ejemplo: Procedure Crear_Archivo( ); var nFh : File of word; // Puntero a Archivo y debes poner el tipo. nDato : word; // la variable debe de ser del mismo tipo que el archivo. Begin assignFile(nFh,' archivo.dat '); rewrite(nFh); // abre de escritura y lo sobreescribe si existe. // reset(nFh); abre de lectura.
nDato:=2624;
write(nFh,nDato); // escribo en el archivo el dato. // Read(nFh,nDato); leo del archivo y lo guardo en la variable nDato.