universal fonts

[delikanli_19_82]

hello everybody,

my question is, which fonts are similar to each other on windows, mac and linux.

i try to build a small toolkit and want to define a general font-structure for title, normal text, frame text and so on.

i want to preload the fonts on all os's. but i am not sure, which font is available on linux as standard equivalent for mac and windows.

i need a table like this:

windows, mac, linux
font_a, font_b, font_c >> the same or similar to each other.

i am speaking about fonts, which are installed as default in each operating system.


A further question is, how can i list all installed fonts on windows, mac and linux?

[IdeasVacuum]

On Windows go to Control Panel/Fonts. You can list them by similarity.

[IdeasVacuum]

...handy info for all 3 platforms: http://en.wikipedia.org/wiki/TrueType

[delikanli_19_82]

thanks for the information

[WilliamL]

This is what I got on my Mac. Of course, what fonts that are installed can vary.

Code: Select all

DataSection
    fonts:
    Data.s "Arial","Helvetica"
    Data.s "Arial Black","Gadget"
    Data.s "Bookman Old Style"
    Data.s "Comic Sans MS"
    Data.s "Courier","Courier","Monaco" ;monospace
    Data.s "Garamond"
    Data.s "Georgia"
    Data.s "Impact","Charcoal" ; sans-serif
    Data.s "Lucida Console" ; --  Not found
    Data.s "Lucida Sans Unicode" ; -- Not found
    Data.s "Lucida Grande"
    Data.s "MS Sans Serif" ;  -- Not found
    Data.s "Geneva"
    Data.s "MS Serif" ; -- Not found
    Data.s "New York" ; -- Not found
    Data.s "Palatino Linotype" ; -- Not found
    Data.s "Book Antiqua"
    Data.s "Palatino","Symbol"
    Data.s "Tahoma","Geneva","Times New Roman"
    Data.s "Times" ; -- Not found
    Data.s "Trebuchet MS","Helvetica"
    Data.s "Verdana"
    Data.s "Webdings"
    Data.s "Wingdings","Zapf Dingbats"
    Data.s "end"
EndDataSection

Define font.s
If OpenWindow(0, 0, 0, 270, 160, "Loading font...", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    TextGadget(0, 10, 10, 250, 40, "")
    Restore fonts
    While font<>"end"
        Read.s font
        If LoadFont(1,font, 24)
            SetGadgetFont(0, FontID(1))
            SetGadgetText(0,font+" is found")
        Else
            SetGadgetText(0,font+" not found")
            Debug font+" is not found"
        EndIf
        Delay(1000)
        While WindowEvent()<>0:Wend
    Wend
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf