Capturar datos desde archivo de texto

[[BlueSteel]]

Hola

Resuelto el problema anterior, me toca preguntar, como borro el contenido o le asigno una marca al archivo para no traspasar nuevamente los datos ?

no se si me explique bien...

como el archivo contiene eventos de un Reloj Control Biométrico, el proceso que realizo es cargar los eventos, luego los tengo que traspasar a una Tabla para su posterior manipulación... pero una vez que traspase todos los eventos, la idea es que no vuelva a leer dicho archivo...

Entre las alternativas que se me ocurren son las sgtes:

- Eliminar el contenido del archivo
- Renombrar la extención del archivo... de *.txt a *.ok
- borrar el archivo....
- agregar una cabecera en el archivo... pero esto me puede generar que el componente no lo lea
- agregar una columna con el campo de verificación .. si el estado es 0 se puede traspasar.. de lo contrario... se puede leer pero no traspasar ?...


Bueno.. saludos...

ahh.. la pregunta es cual seria el metodo más recomendado...

[[seoane]]

Yo para un caso similar utilice la función MoveFile, es decir, primero renombro el archivo y luego lo proceso. Te preguntaras porque renombrarlo y no leerlo y borrarlo, pues muy sencillo, si la función MoveFile tiene éxito quiere decir que ningún otro programa esta usando el archivo, asi evitamos "tocar" el archivo mientras el programa del reloj lo esta usando.

En resumen, seria algo así:

Código Delphi [-]
  while not MovFile('origen.txt','destino.txt') do
    Sleep(10);
  // Ahora procesamos el archivo
  
...

  // Y al final lo borramos
  DeleteFile('destino.txt');

[[BlueSteel]]

Gracias seoane

es una buena alternativa....la provare

Salu2

[ContraVeneno]

lo que yo haría sería poner un índice único en la base de datos, igual y que contenga todos los campos, aunque supongo que con contener la fecha y hora sería suficiente.

Al traspasar la información, capturo la excepción de llave duplicada y listo.
De esa forma, no modifico el archivo para nada. Y el proceso de capturar la excepción es bastante sencillo.