TEXT

This is how Staz showed me to change the color in FB^3 which also could not be done as it was in FBII for a field. You could easily use this EDIT TEXT stuff to change the text for a static field

DIM red,green,blue

A$="BLACK"
LONG IF EDIT$1)<>"RED"
  A$    = "RED"
  red   = -1
  green = 0
  blue  = 0
XELSE
  A$    = "BLACK"
  red   = 0
  green = 0
  blue  = 0
END IF

EDIT FIELD -1,A$,,_NOFRAMEDNOCR
SETSELECT 0,_maxInt
EDIT TEXT ,,,,red,green,blue
EDIT FIELD -1,,,_STATNOFRAMED
EDIT FIELD 0

Here is the function I've got now. It works.

LOCAL FN setfonts(ScriptFont%,ScriptSize%)
  WINDOW OUTPUT _RKWnd
  EDIT FIELD _Krung,,,_NoFramedNoCR
  SETSELECT 0,_maxInt
  EDIT TEXT ScriptFont%,ScriptSize%
  EDIT FIELD _Krung,,,_StatNoFramed
  EDIT FIELD 0
END FN