Editando un archivo de texto

[sirsolrac]

esta es la forma en que hago lo del texto.

//escribir resultados en archivo de texto
AssignFile(myFile, 'users.txt');
Append(myFile);
WriteLn(myFile,'');
Write(myFile,'# Tarjeta numero: '+Edit_CardNum.Text+'');
WriteLn(myFile,' ');
Write(myFile,Edit_Block0data.Text+' ' + 'Password = "' + Edit_CardSize.Text+'"',' ' );
WriteLn(myFile,' ');
CloseFile(myFile);

Es mi primer archivo de texto que he creado y no haye otra forma de hacerlo, muy probablemente hay una manera mas optima. Te agradeceria si me ayudas.