Ok Naomi,

This code seems to go..

#DEFINE iColor_Verte RGB(255,255,191)

WITH THIS
TEXT To .cBackColorGrid NOSHOW TEXTMERGE PRETEXT 15
ICASE(v_AgendaPhar.lgest=.F.,RGB( 251,155,184 ),v_AgendaPhar.sinecessaire,RGB(191,191,255),
ICASE(nRec = 0,16777215,ICASE( v_AgendaPhar.nRec=1,iColor_Verte,RGB(234,244,255))))
ENDTEXT
#UNDEF iColor_Verte

ThanK


bernhart

>>Naomi,
>>
>>I have this code
>>

>> WITH THIS
>>      TEXT To  .cBackColorGrid NOSHOW TEXTMERGE PRETEXT 15
>>    ICASE(v_AgendaPhar.lgest=.F.,RGB( 251,155,184 ),v_AgendaPhar.sinecessaire,RGB(191,191,255),
>>    ICASE(nRec = 0,16777215,ICASE( v_AgendaPhar.nRec=1,RGB(255,255,191),RGB(234,244,255))))
>>      ENDTEXT
>>

>>
>>AND i think that this code run faster..????
>>

>> WITH THIS
>>      TEXT To  .cBackColorGrid NOSHOW TEXTMERGE PRETEXT 15
>>    ICASE(v_AgendaPhar.lgest=.F.,RGB( 251,155,184 ),v_AgendaPhar.sinecessaire,RGB(191,191,255),
>>    ICASE(nRec = 0,16777215,ICASE( v_AgendaPhar.nRec=1,0xC0C0C0,0xFFFFFF)))
>>      ENDTEXT
>>
>>

>>
>>I want dus a foncton That convert RGB(255,255,191 INTO Something such 0xC0C0C0
>>
>>bernhart
>>
>>
>I think you can use integer presentation instead.