Клубове

Fonts

3 отговора 59 прегледа
Haplio #1

Fonts

Навремето някъде мернах сорс, който ти показваше всички инсталирани на компа шрифтове.... но това беше навремето. Сега ми трябва нещо подобно, но няма.. Ако някой от вас знае - нека ми каже. Търсих в сайтове със сорсове, но като напиш "font" и те ти дават хиляди резултати - нали в HTML-а много често се използва тага <font> и дори и в алтернатвата CSS.

Ще съм ви много благодарен!

Vulnerant omnes, ultima necat!
Отговор
Гeoprи в отговор на Haplio #2

Re: Fonts


Dim lngL As Long



For lngL = 0 To Screen.FontCount - 1

    Debug.Print "Screen Font " & lngL & " = " & Screen.Fonts(lngL)

Next 'lngL

For lngL = 0 To Printer.FontCount - 1

    Debug.Print "Printer Font " & lngL & " = " & Printer.Fonts(lngL)

Next 'lngL


Отговор
Haplio в отговор на Гeoprи #3

Re: Fonts

Blagodaria za pomoshta!

Pozdravi!

Vulnerant omnes, ultima necat!
Отговор
Гeoprи в отговор на Haplio #4

Re: Fonts

Пак заповядай :)

Отговор
Отговор в темата