Escribir en archivos con Delphi

[[escafandra]]

Otra idea para guardar tu password es el registro de Windows, así quede fuera del alcance de los fisgones de archivos.

Puestos a variar el código, usemos la API de Windows:

Código Delphi [-]
procedure Write(FileName: PCHAR; Buffer: Pointer; Size: integer);
var
  hFile: integer;
begin
  hFile:= CreateFile(FileName, GENERIC_WRITE, 0, nil, OPEN_ALWAYS, FILE_FLAG_WRITE_THROUGH, 0);
  if hFile <> -1 then
  begin
    _llseek(hFile, 0, FILE_END);
    _lwrite(hFile, Buffer, Size);
    _lclose(hFile);
  end;
end;

Saludos.