How to change foreground color of richedit?

[Michael S. Sanders]

Anyone know how to change the foregrond color in a richedit?
Not the selection color, just the typical foreground.

Was thinking this might work, but it doesnt:

Raw cf As CHARFORMAT
cf.cbSize      = sizeof(CHARFORMAT)
cf.dwEffects  &= ~CFE_AUTOCOLOR
cf.crTextColor = RGB(255,0,0)
cf.dwMask      = CFM_COLOR

SendMessage(hEDT, EM_SETCHARFORMAT, 0, &cf)

--
Later on,
Mike