[lnkForumImage]
TotalShareware - Download Free Software
Confronta i prezzi di migliaia di prodotti.
Asp Forum
 Home | Login | Register | Search 


 

Forums >

microsoft.public.vb.general.discussion

Funky Font Enumeration

Karl E. Peterson

9/8/2010 6:17:00 PM

Just noticed something really odd. If you enumerate fonts using
standard VB methods, a bunch of them are returned twice, once with a
leading ampersand. What's up with that? Repro:

Public Sub Main()
Dim i As Long, s As String
Set s = New CStringBuilder
For i = 0 To Screen.FontCount - 1
Debug.Print Screen.Fonts(i)
s = s & Screen.Fonts(i) & vbCrLf
Next i
Clipboard.Clear
Clipboard.SetText s
End Sub

You'll see things like this in the output:

<...snip...>
Adobe Caslon Pro Bold
Adobe Caslon Pro
Adobe Fangsong Std R
@Adobe Fangsong Std R
Adobe Heiti Std R
@Adobe Heiti Std R
Adobe Kaiti Std R
@Adobe Kaiti Std R
Adobe Ming Std L
@Adobe Ming Std L
Adobe Myungjo Std M
@Adobe Myungjo Std M
Adobe Song Std L
@Adobe Song Std L
Adobe Garamond Pro Bold
Adobe Garamond Pro
<...snip...>
Arial
Arabic Transparent
Arial Baltic
Arial CE
Arial CYR
Arial Greek
Arial TUR
Batang
@Batang
BatangChe
@BatangChe
Gungsuh
@Gungsuh
GungsuhChe
@GungsuhChe
Courier New
Courier New Baltic
Courier New CE
Courier New CYR
Courier New Greek
Courier New TUR
<...snip...>

I thought perhaps they were the mysterious "hidden" fonts in Windows 7,
but that's not it. While those Batang* fonts are hidden, the Adobe*
ones aren't. On this system. Anyone know WTH those ampersands mean?

--
..NET: It's About Trust!
http://vfre...
27 Answers

Tim Rude

9/8/2010 7:09:00 PM

0

Karl,

Sorry, I don't know the answer to your question.

However, @ isn't an ampersand. An amperand is &. According to MS Character
Map applet, @ is a 'Commercial At' sign.

So I guess you want to ask: Anyone know WTH those 'Commercial At's mean? :)

Tim Rude

"Karl E. Peterson" <karl@exmvps.org> wrote in message
news:i68jug$ljs$1@news.eternal-september.org...
> Just noticed something really odd. If you enumerate fonts using standard
> VB methods, a bunch of them are returned twice, once with a leading
> ampersand. What's up with that? Repro:

<snip>

> I thought perhaps they were the mysterious "hidden" fonts in Windows 7,
> but that's not it. While those Batang* fonts are hidden, the Adobe* ones
> aren't. On this system. Anyone know WTH those ampersands mean?
>

Karl E. Peterson

9/8/2010 7:19:00 PM

0

Tim Rude brought next idea :
> Karl,
>
> Sorry, I don't know the answer to your question.
>
> However, @ isn't an ampersand. An amperand is &. According to MS Character
> Map applet, @ is a 'Commercial At' sign.
>
> So I guess you want to ask: Anyone know WTH those 'Commercial At's mean? :)

Yeah, realized I'd misspoken right after posting that.

So, ..., WTH??? <g>

Fwiw, I just compared the output with EnumFontFamilies on Windows 7,
and it's identical. No such critters under an XP VM, here, either.

--
..NET: It's About Trust!
http://vfre...

VB 6 Devotee

9/8/2010 7:20:00 PM

0

True Type Collection


"Karl E. Peterson" <karl@exmvps.org> wrote in message
news:i68jug$ljs$1@news.eternal-september.org...
> Just noticed something really odd. If you enumerate fonts using standard
> VB methods, a bunch of them are returned twice, once with a leading
> ampersand. What's up with that? Repro:
>
> Public Sub Main()
> Dim i As Long, s As String
> Set s = New CStringBuilder
> For i = 0 To Screen.FontCount - 1
> Debug.Print Screen.Fonts(i)
> s = s & Screen.Fonts(i) & vbCrLf
> Next i
> Clipboard.Clear
> Clipboard.SetText s
> End Sub
>
> You'll see things like this in the output:
>
> <...snip...>
> Adobe Caslon Pro Bold
> Adobe Caslon Pro
> Adobe Fangsong Std R
> @Adobe Fangsong Std R
> Adobe Heiti Std R
> @Adobe Heiti Std R
> Adobe Kaiti Std R
> @Adobe Kaiti Std R
> Adobe Ming Std L
> @Adobe Ming Std L
> Adobe Myungjo Std M
> @Adobe Myungjo Std M
> Adobe Song Std L
> @Adobe Song Std L
> Adobe Garamond Pro Bold
> Adobe Garamond Pro
> <...snip...>
> Arial
> Arabic Transparent
> Arial Baltic
> Arial CE
> Arial CYR
> Arial Greek
> Arial TUR
> Batang
> @Batang
> BatangChe
> @BatangChe
> Gungsuh
> @Gungsuh
> GungsuhChe
> @GungsuhChe
> Courier New
> Courier New Baltic
> Courier New CE
> Courier New CYR
> Courier New Greek
> Courier New TUR
> <...snip...>
>
> I thought perhaps they were the mysterious "hidden" fonts in Windows 7,
> but that's not it. While those Batang* fonts are hidden, the Adobe* ones
> aren't. On this system. Anyone know WTH those ampersands mean?
>
> --
> .NET: It's About Trust!
> http://vfre...
>
>

James Tyler

9/8/2010 7:30:00 PM

0

@ sign means Asian character rotated 90 degree. Traditonally chinese
character is written from top to bottom.
It makes sense when printed out. But don't make me explain.

"Karl E. Peterson" <karl@exmvps.org> wrote in message
news:i68jug$ljs$1@news.eternal-september.org...
> Just noticed something really odd. If you enumerate fonts using standard
> VB methods, a bunch of them are returned twice, once with a leading
> ampersand. What's up with that? Repro:
>
> Public Sub Main()
> Dim i As Long, s As String
> Set s = New CStringBuilder
> For i = 0 To Screen.FontCount - 1
> Debug.Print Screen.Fonts(i)
> s = s & Screen.Fonts(i) & vbCrLf
> Next i
> Clipboard.Clear
> Clipboard.SetText s
> End Sub
>
> You'll see things like this in the output:
>
> <...snip...>
> Adobe Caslon Pro Bold
> Adobe Caslon Pro
> Adobe Fangsong Std R
> @Adobe Fangsong Std R
> Adobe Heiti Std R
> @Adobe Heiti Std R
> Adobe Kaiti Std R
> @Adobe Kaiti Std R
> Adobe Ming Std L
> @Adobe Ming Std L
> Adobe Myungjo Std M
> @Adobe Myungjo Std M
> Adobe Song Std L
> @Adobe Song Std L
> Adobe Garamond Pro Bold
> Adobe Garamond Pro
> <...snip...>
> Arial
> Arabic Transparent
> Arial Baltic
> Arial CE
> Arial CYR
> Arial Greek
> Arial TUR
> Batang
> @Batang
> BatangChe
> @BatangChe
> Gungsuh
> @Gungsuh
> GungsuhChe
> @GungsuhChe
> Courier New
> Courier New Baltic
> Courier New CE
> Courier New CYR
> Courier New Greek
> Courier New TUR
> <...snip...>
>
> I thought perhaps they were the mysterious "hidden" fonts in Windows 7,
> but that's not it. While those Batang* fonts are hidden, the Adobe* ones
> aren't. On this system. Anyone know WTH those ampersands mean?
>
> --
> .NET: It's About Trust!
> http://vfre...
>
>


Karl E. Peterson

9/8/2010 7:30:00 PM

0

Karl E. Peterson laid this down on his screen :
> Just noticed something really odd. If you enumerate fonts using standard VB
> methods, a bunch of them are returned twice, once with a leading ampersand.
> What's up with that?

Okay, it was actually a "commercial at" (@) symbol, not an "ampersand"
(&). That aside, here's the first clue:

http://www.ms-news.net/f2733/fonts-prefix-40...

Isn't/Wasn't Uwe a regular here? Looks like this definitely goes back.
That thread was dated 2004! S/he says to search on "true type
collection" for further clues. That ringing any bells here?

Searching...

--
..NET: It's About Trust!
http://vfre...

Karl E. Peterson

9/8/2010 7:31:00 PM

0

VB 6 Devotee formulated the question :
> True Type Collection

Ahhh, yeah, had just found that. So... Significance?

--
..NET: It's About Trust!
http://vfre...

Karl E. Peterson

9/8/2010 7:43:00 PM

0

Phil Hunt presented the following explanation :
> @ sign means Asian character rotated 90 degree. Traditonally chinese
> character is written from top to bottom.
> It makes sense when printed out. But don't make me explain.

Okay, this is definitely getting confusing. The thread I pointed to
earlier also has both explanations - rotated Asian *and* TTC.

The TTC thing stands up to futher searches, though I still have trouble
grasping the significance of it.

I guess what I'm getting around to is, if you're building a list of
fonts for a user to choose from (without using the built-in ChooseFont
dialog, of course), what do you do with these critters? And why?

Thanks... Karl

--
..NET: It's About Trust!
http://vfre...

James Tyler

9/8/2010 7:52:00 PM

0

Just another font.
Choose it if you want it.

"Karl E. Peterson" <karl@exmvps.org> wrote in message
news:i68p08$fcj$1@news.eternal-september.org...
> Phil Hunt presented the following explanation :
>> @ sign means Asian character rotated 90 degree. Traditonally chinese
>> character is written from top to bottom.
>> It makes sense when printed out. But don't make me explain.
>
> Okay, this is definitely getting confusing. The thread I pointed to
> earlier also has both explanations - rotated Asian *and* TTC.
>
> The TTC thing stands up to futher searches, though I still have trouble
> grasping the significance of it.
>
> I guess what I'm getting around to is, if you're building a list of fonts
> for a user to choose from (without using the built-in ChooseFont dialog,
> of course), what do you do with these critters? And why?
>
> Thanks... Karl
>
> --
> .NET: It's About Trust!
> http://vfre...
>
>


Karl E. Peterson

9/8/2010 7:58:00 PM

0

VB 6 Devotee used his keyboard to write :
> True Type Collection

Hmmmm, seems I'm also getting @'s on fonts that come in OTF files,
too...

And, neither filetype assures getting an @ listing...

--
..NET: It's About Trust!
http://vfre...

Karl E. Peterson

9/8/2010 7:59:00 PM

0

Phil Hunt formulated the question :
>> I guess what I'm getting around to is, if you're building a list of fonts
>> for a user to choose from (without using the built-in ChooseFont dialog, of
>> course), what do you do with these critters? And why?
>
> Just another font.
> Choose it if you want it.

Not sure about that. Word doesn't offer it, for example.

--
..NET: It's About Trust!
http://vfre...