JUDSON ROSA Posted April 27, 2016 Report Share Posted April 27, 2016 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.. Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted April 27, 2016 Author Report Share Posted April 27, 2016 oi galera da uma força ai . Quote Link to comment Share on other sites More sharing options...
evertonlb Posted April 28, 2016 Report Share Posted April 28, 2016 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 Quote Link to comment Share on other sites More sharing options...
evertonlb Posted April 28, 2016 Report Share Posted April 28, 2016 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 Quote Link to comment Share on other sites More sharing options...
evertonlb Posted April 28, 2016 Report Share Posted April 28, 2016 Meu.. descobri coisas nestas olhada no manual! rsrsrsrsr Nem sabia que a Set Message possibilitava tanto! Att. Everton Quote Link to comment Share on other sites More sharing options...
aferra Posted April 28, 2016 Report Share Posted April 28, 2016 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? kapiaba 1 Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted April 28, 2016 Author Report Share Posted April 28, 2016 Infelizmente Everton nao funcionou Quote Link to comment Share on other sites More sharing options...
evertonlb Posted April 29, 2016 Report Share Posted April 29, 2016 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 Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted April 29, 2016 Author Report Share Posted April 29, 2016 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. Quote Link to comment Share on other sites More sharing options...
marcioe Posted April 29, 2016 Report Share Posted April 29, 2016 Da forma que esta a minha veja o nome em vermelho e azul Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted April 29, 2016 Author Report Share Posted April 29, 2016 Isso mesmo marcio , mas essa cor ela ja veem quando colocamos 2007 , eu consigo mudar a cor das letras mas o fundo degrade nao . Quote Link to comment Share on other sites More sharing options...
toya Posted May 1, 2016 Report Share Posted May 1, 2016 01. Adicionar o msg_bar.bmp ao vosso .RES02. 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 Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted May 3, 2016 Author Report Share Posted May 3, 2016 Opa , Elcio vou testar amigo e reporto aqui o resultado , valeu Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted May 4, 2016 Author Report Share Posted May 4, 2016 A todos e o Elcio , meu muito obrigado funcionou perfeitamente , valeu msm qualquer coisa estou a disposição. Quote Link to comment Share on other sites More sharing options...
mkyx Posted May 5, 2016 Report Share Posted May 5, 2016 Judson, se não for muito, pediria, pro c postar aqui no fórum, como vc fez, pode ser parte do código. Obrigado. Quote Link to comment Share on other sites More sharing options...
toya Posted May 5, 2016 Report Share Posted May 5, 2016 Se me permitirem, dou um repeteco... 01. Adicionar o msg_bar.bmp ao vosso .RES02. 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 Theotokos 1 Quote Link to comment Share on other sites More sharing options...
JUDSON ROSA Posted May 6, 2016 Author Report Share Posted May 6, 2016 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. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.