For question no. 2, I made this function
Function getwebcolor
Return Substr(Transform(GetColor(),'@0'),5)
So to convert a numeric color value into hex, you can use
lcHexColor=Substr(Transform(lnColor,'@0'),5)
>We have the following code in our VFP 6.0 to send an email to MS Outlook in a specific font, size and color.
>
>=====
>
>loEmailItem.HTMLBody = [<html><font face = ]+ Slcrm.cbodyfont+[>];
> + [<font size = ] + lnsize + [> <font color = "="#ff0000">] + This.Parent.EdtNotes.Value;
> + [</font></html>]
>
>=====
>
>We have two problems:
>1) If we try to send font size 12 px, the email comes in at 36 px.
>i.e. lnsize="12px" or "14px" in our VFP
>
>2) For color we do not know how to convert color from numeric to hex.
>The color never matches what we are trying to send out.
