Programmable RTF Box (RICGEDT20)

I have added to the vbAccelerator RTF Box (based on RICHEDIT20.DLL) to enable text to be formatted within code by a series of embedded formatting codes. However, I have problems. The main one is to do with background colours (Highlighted text style). I cannot get it to initialise to transparent, and so every text entry has to start with a command to set the backcolor to -1.

This code is lengthy is and complex, so if you are not familiar with custom control writing and OLETranslateColor do not reply. I can email the project (400K zipped) as required.

Thanks