[aprendiz2]

Empezado por JXJ

archivo guardar como..

no entiendo tu pregunta. con delphi..
puedes abrir y guardar informaicon al disco duro y verificar
que se escribio.
puedes basarte en un editor de texto.

A veces, lo que ves en el editor al comprobar, no necesariamente se esta leyendo del disco duro, se puede estar leyendo de los mismos buffers de Windows.

Para comprobarlo, haga los siguiente.

1 - Grabar algo.
2 - Desconectar el cable de la corriente.
3 - Conectar el cable de la corriente, arrancar la PC, intentar leer lo que se "grabo".

Si lo que grabaste aun esta ahi, problablemente el programa que grabo utilizo FlushFileBuffers despues de grabar. Si no esta ahi, entonces no lo utilizo.

Para aquellos que viven en paises donde la electricidad no falla, nunca veran la necesidad de "grabar inmediatamente".

En paises donde falla la electricidad, es sumamamente importante brincarse o vaciar inmediatamente los buffers. De otra manera, los archivos pueden quedar realmente destrozados.

Cuando se trata de "transacciones" de empresa, perder archivos completos no es aceptable.

Me diras que un UPS resuelve la situacion, pero te dire que no.

Los UPS funcionan excelente cuando el voltaje que alimenta el UPS desaparece.

Hay casos donde el voltaje que alimenta al UPS, "parpadea" rapidamente, en cuyo caso el UPS decide apagarse por auto-proteccion !!!. Se apaga hasta que todo se estabiliza.

Mientras tanto tu PC ya se apago y tus archivos quedaron literalmente destrozados ( los que tenian transacciones en los buffers de Windows ).


( He probado muchas marcas de UPS, todos hacen lo mismo ).
Inversores grandes tambien hacen los mismo ( con baterias de camion ).

Aqui donde vivo el caso es muy comun ( imagino en muchos otros paises "sub-desarrollados" tambien sucede lo mismo ). Varias veces al dia puden suceder "fenomenos" electricos, que causan que los UPS se apaguen ( parpadeos les llamo yo ).

El problema se resuelve forzando a Windows que grabe inmediatamente con
flushfilebuffers despues de cada transaccion. Ahi los archivos quedan en muy buen estado aun apagando la PC en medio de un proceso de escritura.

Mi queja viene de que Windows realiza el FlushFileBuffers con una lentitud extrema ( sin motivo, digo yo ), ya que grabar directamente a un diskette es mas rapido ( Windows no utiliza buffers al grabar al diskette ).

Ojala me haya explicado...


Si deseas comprobar la utilidad de flushFileBuffers al grabar, puedes hacer el siguiente experimento, muy sencillo:

En un formulario,
- agregar un boton.
- agregar un TLabel
- agregar 2 checkboxes.
- cambiar el nombre de un checkbox a CheckBoxDetener.
- cambiar el nombre del otro checkbox a CheckBoxFlush.
- en el OnClick del boton escribir la siguiente rutina:

Código Delphi [-]
procedure TForm1.Button1Click( Sender : TObject );
  var  F : TFileStream;
        n : integer;
        S : string;
begin      
         {--- Crear un archivo ---}
 
       F := TFileStream.Create('C:\Prueba.txt', fmCreate );
       F.Free;  
 
          { Grabar "renglones", note que abrimos y cerramos  }
          { el archivo en cada vuelta del ciclo, lo cual daria   }
          { la impresion de que con cada vuelta, Win acutlizaria }
          { sus FAT y Directory entries, pero no lo hace, a menos }
          { que se haga flushFileBuffers despues de cada escritura }
 
       repeat
           F := TFileStream.Create( 'C:\Prueba.txt', fmOpenWrite + fmShareDenyNone );
          F.Position := F.Size ;   // ir al final del archivo
 
          S := 'Renglon ' + intToStr( i ) + #13 + #10; // lo que vamos a grabar
 
          F.WriteBuffer( S[1], length( S ) ); // grabamos lo que hay en S 
          
          if checkboxFlush.Checked then
               FlushFileBuffers( F.Handle );  //  API de Windows 
 
          F.Free;   // "cerrar" el archivo
 
 
            {   Mostrar contador en la pantalla    }
 
           inc( n );    label1.Caption := intToStr(n);  label1.Update;
 
           application.ProcessMessages;
      until CheckBoxDetener.Checked;
 
end;

Si corres este programa, puedes ver el resultado con el NotePad o cualquier otro editor de texto. Simplemente abrir C:\Prueba.txt.

Tambien podras ver la diferencia en velocidad al utilizar el FlushFileBuffers.

Puedes probar desconectar la PC de la electricidad mientras esta escribiendo y veras la gran diferencia de lo que queda en el archivo. ( Si ! desconectar el cable de la corriente, mientras el ciclo esta ejecutandose. No tengas miedo... prueba !. )

Despues de hacer esto, verifica el resultado con cualquier editor de texto.

Ahora, imagina que ese archivo son facturas/recibos/ etc. que estan sucediendo una detras de la otra, desde varias PCs en red. Como quedarian los archivos despues de una falla de electricidad ?

Saludos !!!!