Font List & Combo控件

Font List & Combo控件常见问题

下面是用户经常会问到的一些技术问题：

如何保存和恢复“最近使用过的字体列表”?
问: 我打算在程序退出时保存“最近使用过的字体列表”，并在程序启动时恢复“最近使用过的字体列表”，如何做？

答: 你可以使用下面的代码保存：

For i = FontList1.RecentFontsCount - 1 To 0 Step -1
SaveSetting "MyApp", "RFL", CStr(i), _
GetRecentFontName(i)
Next

你可以使用下面的代码进行恢复：
For i = 0 To Font1.MaxRecentFontsCount - 1
sFont = GetSetting("MyApp", "RFL", CStr(i), "")
If sFont = "" Then Exit For
FontList1.AddRecentFontName sFont

Next

回到开始
如何清除“最近使用过的字体列表”?

问: 是否有办法清除掉“最近使用过的字体列表”?

答: 你可以设置MaxRecentFontsCount属性为0。
回到开始

如果您有任何建议和意见, 请发个电子邮件给我们:.