Perguntas Cor de texto e fundo em TGet

Boa noite pessoal !

Estou tentando colocar uma cor de fundo e também para o texto no componente TGet e não estou conseguindo, já tentei de várias formas e não tem jeito.
Onde estou errando ?

Segue trecho do fonte onde ocorre essa situação e fonte completo logo a seguir.

oImport := TGet():New(001,001,{||cImport},oTFolder:aDialogs[2],096,009,"",,16776960,16711680,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cImport,,,, )

// oImport:NCLRPANE := CLR_HRED
// oImport:NCLRTEXT := CLR_WHITE

---

#include 'rwmake.ch'
#include "protheus.ch"
#INCLUDE "TOPCONN.CH"
#INCLUDE 'TOTVS.CH'

User Function JACC057()

Private cPedido := "" // Recebe Pedido a ser Processado
Private oPedido
Private cPedidos := "" // Grupo de Pedidos a serem Processados
Private oPedidos
Private cImport := "IMPORTADOR:"
Private oImport
Private cLisEmp := "L I S T A D E E M P A Q U E"
Private OLisEmp

DEFINE MSDIALOG oDlg TITLE "Romaneio Exportação" FROM 0,0 TO 610,995 pixel of oMainWnd

// Cria a Folder
aTFolder := { 'Gerar Planilha', 'Ajustar / Imprimir' }
oTFolder := TFolder():New(001,002,aTFolder,,oDlg,,,,.T.,,496,282)

// Pasta1 = Gerar Planilha
oGrp1 := tGroup():New(002,002,038,150,"Pedido",oTFolder:aDialogs[1],,,.T.,)
oPedido := TGet():New( 010,005,{||cPedido} ,oGrp1,037,009,"",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cPedido,,,, )
oPedidos := TGet():New( 025,005,{||cPedidos},oGrp1,143,009,"",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cPedidos,,,, )

oBtn01 := TButton():New(008,044,"Limpar",oGrp1,{|| oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)
oBtn02 := TButton():New(008,097,"Gerar" ,oGrp1,{|| oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)

// Pasta2 = Ajustar / Imprimir

oImport := TGet():New(001,001,{||cImport},oTFolder:aDialogs[2],096,009,"",,16776960,16711680,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cImport,,,, )

// oImport:NCLRPANE := CLR_HRED
// oImport:NCLRTEXT := CLR_WHITE

oLisEmp := TGet():New(001,200,{||cLisEmp},oTFolder:aDialogs[2],096,009,"",,8421376,4227327,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cLisEmp,,,, )

oSayRep := tSay():New(023,023,{|| 'Quantidade de registros: '},oTFolder:aDialogs[2],,,,,,.T.,CLR_RED,CLR_WHITE,100,20)

// Rodapé da tela principal
@ 290,002 SAY " Processamento: " SIZE 90,10 PIXEL OF oDlg

oBtn03 := TButton():New(287,282,"Imprimir" ,oDlg,{||oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)
oBtn04 := TButton():New(287,337,"Restaurar",oDlg,{||oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)
oBtn05 := TButton():New(287,392,"Salvar" ,oDlg,{||oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)
oBtn06 := TButton():New(287,447,"Sair" ,oDlg,{||oDlg:End()},50,15,,,.F.,.T.,.F.,,.F.,,,.F.)

oTFolder:SetOption(2)
oBtn06:SetFocus()

ACTIVATE DIALOG oDlg CENTERED

Return