Need Document Fonts in .TXT format

Question

Hi All,
I am trying a script which is in "InDesignCS3_ScriptingGuide_JS" related to font list.
My requirement:
How can we get documents font list in .txt format.
Trying Code is below:
//To display font name (working fine)
var myDocument = app.activeDocument
var myDocumentFontNames = myDocument.fonts.everyItem().getElements();
for(var i = 0; i<myDocumentFontNames.length; i++){
alert(myDocumentFontNames[i].name);
//i think here is doubt
var myFileName = "~/Desktop/Test.txt";
myDocumentFontNames.exportFile(ExportFormat.taggedText, File(myFileName));
Can anyone give solution for me if you willing.
Thanks in advance
BEGINNER

Answer 1

@BEGINNER – you need not to loop through "fontList", because with everyItem() you already get something that you can change directly into a string:
var fontNameListString = app.activeDocument.fonts.everyItem().name.join();
With "join()" you get a String object that concatenates every single contents of the array. The delimiter between the substrings is a "," by default. You could choose another one:
var fontNameListString = app.activeDocument.fonts.everyItem().name.join("\n");
In the case above a newline character will injected. "\r" for a paragraph sign would also do.
Now every single font name is either in a new line or in a new paragraph.
Oh. And you have to know, that the name of a font consists of two parts: the family and the style. And the two parts are devided by a tab-character which is represented by "\t".
Example:
Univers 47     Light Condensed
For legibility or any other reason you could choose to replace all tabs with something else, e.g. a blank.
var fontNameListString = app.activeDocument.fonts.everyItem().name.join("\n").replace(/\t/g,"");
The replace() function can take a regular expression like /\t/g, which means look for all tabs globally. Then comes the part with what you like to replace. This is a string that consists of only one blank.
So with the last line of code you get a string like that:
Univers 47 Light Condensed
Univers 67 Bold Condensed
Univers 59 Ultra Condensed
Arial Narrow Bold
Arial Narrow Regular
And now you need a text file or something else, how about a text frame in InDesign, to feed that string as contents.
Example:
var fontNameListString = app.activeDocument.fonts.everyItem().name.join("\n").replace(/\t/g,"");
app.activeDocument.textFrames.add({
     geometricBounds:[0,0,100,100],
     contents:fontNameListString
Without specifying on what specific page the text frame should be added, it's always done on page one.
Uwe