下面的示例创建名为 wfontchar 的用户自定义窗口，激活该窗口后，在窗口中显示其字体特征，然后显示 visual foxpro 主窗口的字体特征。
clear
define window wfontchar ;
from 1,1 to 3,35 ;
font 'ms sans serif',8 ;
style 'bi' && 定义具有字体和字形的窗口
activate window wfontchar
? wfont(1), wfont(2), wfont(3) && wfontchar 窗口
activate screen
?
?
?
? 'font characteristics for the window wfontchar'
?
?
? wfont(1,''), wfont(2,''), wfont(3,'') && visual foxpro 主窗口
?
? 'font characteristics for the main visual foxpro window'
wait window
release window wfontchar
clear