VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

CustFont

Rob Bogdanoff  (1 Submission)   Custom Controls/Forms/Menus   Visual Basic 3.0   Beginner   Wed 3rd February 2021

Here is a simple custom font dialog. Using the API
EnumFontFamily, it finds all TrueType and Fixed width
fonts. The font names are displayed, w/icon, in a listview.
A slider control allows continuous scrolling of font size.
A sample of the font at the selected size and style is displayed.
A DrawFameOn routine is included which is used to frame
all the controls (see screen shot).

Assumes
Written in VB6 and requires ListView, ImageList, and Slider controls.

Returns
FontName FontSize FontStyle Underline effect StrikeThru effect

Rate CustFont (6(6 Vote))

Download CustFont

CustFont Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters