Does anyone know of any pre-built VB6 code to create a font with no smoothing (neither ClearType nor greyscale) and select it into the hDC of a Form, PictureBox, etc.?

Ideally I'd want to be able to use the Print pseudo-method after setting the font as well as DrawText/DrawTextEx but I could live with just using the APIs to print if that becomes an issue.

I don't want to disable ClearType or smoothing globally, just on particular "canvases" within a program.


This looks pretty easy but might take some tweaking, so I was hoping somebody had some tested code already that is close to "drop-in ready." Searches haven't turned anything up yet.

I'm writing a program that does some text rendering with highlights, shadows and such and the anti-aliasing is troublesome.