MUDAR COR NO SET MESSAGE 2007 ( RESOLVIDO )

[JUDSON ROSA]

Pessoal ja pesquisei aqui no fórum e não consegui encontrar e ou não deu certo mudar a cor na barra do set message 2007 ou colocar um bitmap :

SET MESSAGE OF oWnd TO " "+w_house COLOR CLR_GREEN,CLR_WHITE FONT vfonts[03] 2007

Define MsgItem aItemMsg_Fone OF oWnd:oMsgBar;

Prompt w_fone Size 300 ;

COLOR CLR_GREEN , CLR_WHITE FONT vfonts[03] pixel

Define MsgItem aItemMsg_Versao OF oWnd:oMsgBar;

Prompt "Ver: "+w_vers Size 80 ;

COLOR CLR_GREEN , CLR_WHITE FONT vfonts[03] pixel

Define MsgItem aItemMsg_Servidor OF oWnd:oMsgBar;

Prompt iif( cServidor == "S", " SERVIDOR ", " ESTAÇÃO " ) Size 100 ;

COLOR CLR_GREEN , CLR_WHITE FONT vfonts[03] pixel left

Define MSGITEM aItemMsg_usuario OF oWnd:oMsgBar ;

PROMPT "Usuário: "+alltrim(vUsuarios) SIZE 150 ;

COLOR CLR_RED , CLR_WHITE FONT vfonts[03] pixel BITMAP "BMP_RUN"

oWnd:oMsgBar:KeybOn()

oWnd:oMsgBar:DateOn()

oWnd:oMsgBar:ClockOn()

No aguardo..

[JUDSON ROSA]

oi galera da uma força ai .

[evertonlb]

Assim funcionou..

SET MESSAGE OF oForm_Prd TO "Cadastro de Matéria Prima/Itens Produzidos" FONT oFONTx8 COLOR 255,0

Fonte BOLD com Letras vermelhas sobre fundo preto!

Att.

Everton

[evertonlb]

SET MESSAGE [ OF <oWnd> ];

[ TO <cMsg> ];

[ CENTERED | CENTER ] ;

[ FONT <oFont> ] ;

[ CLOCK | TIME ] ;

[ DATE ] ;

[ KEYBOARD ] ;

[ COLOR | COLORS <nClrFore>;[,<nClrBack>] ] ;

[ NOINSET | NO INSET]

<oWnd> A reference to its container window

<cPrompt> The default msg to show

<oFont> An optional reference to a font object to use to display the msg.

<nClrFore> Foreground color as a RGB number, or as a xBase string

<nClrBack> Background color as a RGB number

<oMsgItem> A reference of the MsgItem objet.

<oMsgBar> A reference of its container MsgBar.

<nSize> Size of the MsgItem.

<uAction> The action to perform when the mouse is clicked over .

<cBitmap1>, <cBitmap2> Bitmaps to show for active and inactive state of the Msgitems

<cToolTip> Msgitem tooltip text

CLAUSES

CENTERED if the text should show centered

CLOCK | TIME Time in the MsgBar.

DATE Date in the MsgBar.

KEYBOARD Keyboard status in the MsgBar.

NOINSET For a non-inset MsgBar appearance

[evertonlb]

Meu.. descobri coisas nestas olhada no manual! rsrsrsrsr

Nem sabia que a Set Message possibilitava tanto!

Att.

Everton

[aferra]

os manuais fazem maravilhas.,...mas uma parte não gosta de ler...ler faz bem. kkkkkkkk né Kapi, ops, esse lê demais, até o que não precisa né MONA?

[JUDSON ROSA]

Infelizmente Everton nao funcionou

[evertonlb]

Poxa Judson... que pena. Vou ver se encontro alguma coisa por aqui.. mas me diga uma coisa.. Set Message e o Set Message 2007 são diferentes?? os dois pertencem ao FW?

É que esse Set Message 2007 eu nunca vi, mas de uma olhada nisso pra ver se te ajuda!

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=26182&p=143838&hilit=set+message+2007#p143838

Att.

Everton

[JUDSON ROSA]

e sim everton , veja ai como faço:

// Definido e Abrindo Tela Principal

DEFINE WINDOW oWnd TITLE nempresa ;

FROM 0, 0 TO 100,100 ; // acoor_v, acoor_H ;

PIXEL ;

ICON oIco01 ;

BRUSH oBrush01

SET MESSAGE OF oWnd TO " "+w_house FONT vfonts[03] 2007 COLOR 255,0 // CLR_GREEN,CLR_WHITE

Coloquei do jeito q vc disse e nada . So funciona se eu tirar o 2007.

mas quero o 2007 porque fica um degrade na cor , o que eu quero e mudar essa cor em degrade.

[marcioe]

Da forma que esta a minha

veja o nome em vermelho e azul

[JUDSON ROSA]

Isso mesmo marcio , mas essa cor ela ja veem quando colocamos 2007 , eu consigo mudar a cor das letras mas o fundo degrade nao .

[toya]

01. Adicionar o msg_bar.bmp ao vosso .RES
02. Adicionar o texto da rotina contida em msg_bar.txt ao vosso .PRG

02.1 - Alterar o nome da rotina para: MsgBar2010 ou MsgBar2015 se estiveres utilizando um destes padrões ao invés de MsgBar2007

Para gerar este bitmap utilizei:
Gradient nRgb( 102, 153, 204 ) e nRgb( 000, 102, 153 )

msg_bar.bmp

msg_bar.txt

[JUDSON ROSA]

Opa , Elcio vou testar amigo e reporto aqui o resultado , valeu

[JUDSON ROSA]

A todos e o Elcio , meu muito obrigado funcionou perfeitamente , valeu msm qualquer coisa estou a disposição.

[mkyx]

Judson, se não for muito, pediria, pro c postar aqui no fórum, como vc fez, pode ser parte do código.

Obrigado.

[toya]

Se me permitirem, dou um repeteco...

01. Adicionar o msg_bar.bmp ao vosso .RES
02. Adicionar o texto da rotina contida em msg_bar.txt ao vosso .PRG

02.1 - Alterar o nome da rotina para: MsgBar2010 ou MsgBar2015 se estiveres utilizando um destes padrões ao invés de MsgBar2007

[JUDSON ROSA]

Ola , fiz como o Elcio mandou ,

1 -criei o meu proprio bitmap e coloquei na meu .res ( eu uso o pelles ) com o nome G_MSG_BAR , ja que a cor que eu quero e diferente da dele .

2 - adicionei a rotina abaixo ao meu sistema:

function MsgBar2007()

return ( LoadBitmap( GetResources(), "G_MSG_BAR" ) )

No fonte source\classes\msgbar.prg se vc der uma olha la tem a chamada dessa funcao MsgBar2007 , mas so vai funcionar se vc colocar 2007 no set message

e pronto , qualquer coisa to no skype procura JUDSON ROSA COSTA.