C_INTEGER(Foreground;Background)
Foreground:=Red 
Background:=Light Blue 
SET COLOR(*;"TextVar1";-(Foreground+(256*Background)))