[REBOL] Re: Setting default font for all View sessions
From: anton::wilddsl::net::au at: 29-Dec-2006 3:16
Hi Brian,
>> ? "font-"
Found these words:
font-fixed string! "courier new"
font-sans-serif string! "arial"
font-serif string! "times"
layout [
vh1 "Yo!" font-name font-fixed
style text text font-name font-fixed
text "Enter your name: "
]
OR
foreach [style obj] svv/vid-styles [
if all [
obj/font
obj/font/name <> font-fixed
][
print [style obj/font/name]
obj/font/name: font-fixed
]
]
face/font/name: font-fixed
As I recall, Cyphre made a function which does similar to the above.
Regards,
Anton.
