mamp Posted April 11, 2009 Report Share Posted April 11, 2009 tenho no programa um objeto que coloca uma palavra na tela @ lin,col say oSay prompt Palavra of tela color CLR_HRED pois a palavra comeca como vermela, porem com um tempo (X) minutos ela tem que ficar AZUl e VERDE e etc no refresh() da tela eun uso oSay:(palavra) oSay:Refresh() porem nao to conseguindo ver onde eu mudo a cor dentro do refresh() da tela, alguem pode me ajudar? nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
mamp Posted April 11, 2009 Author Report Share Posted April 11, 2009 tenho no programa um objeto que coloca uma palavra na tela @ lin,col say oSay prompt Palavra of tela color CLR_HRED pois a palavra comeca como vermela, porem com um tempo (X) minutos ela tem que ficar AZUl e VERDE e etc no refresh() da tela eun uso oSay:(palavra) oSay:Refresh() porem nao to conseguindo ver onde eu mudo a cor dentro do refresh() da tela, alguem pode me ajudar? nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
personal Posted April 12, 2009 Report Share Posted April 12, 2009 Na sua função onde controla os (X) minutos. Palavra:=SetColor(cor1,cor2) Palavra:=SetText(novo_texto_se_quizer) oPalavra:Refresh() Quote Link to comment Share on other sites More sharing options...
mamp Posted April 12, 2009 Author Report Share Posted April 12, 2009 este (cor1,cor2) o que é? nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
marcio1361303176 Posted April 12, 2009 Report Share Posted April 12, 2009 Palavra:=SetColor(cor1,cor2) Palavra= sua variavel.... SetColor(nRGB( 230, 230, 230 ),nRGB( 255, 255, 000 )) Seria algo mais ou menos assim, já havia lhe falado isso ante no MSN. Espero ter ajudado.. informaisvrb@gmail.com FWHX 2.6+ SQLLIB + xDev + rpv + MYSQL 5.0 / fwh808+sqllib(atual) Msn.: mastermarvrb@msn.com Quote Link to comment Share on other sites More sharing options...
mamp Posted April 12, 2009 Author Report Share Posted April 12, 2009 tentei usar:(colocando CLR_HBLUE em cor1 e cor2) O SetColor() esta ok o SetText() ele diz que nao existe e se: Palavra:=SetColor(cor1,cor2) Palavra:=SetText(novo_texto_se_quizer) 1- o que faz a ligacao entre Palavra e oPalavra, nao ta faltando alguma coisa para que a funcao oPalavra:Refresh() execute a troca da cor? 2- se eu coloco "Palavra:=SetText(novo_texto_se_quizer)" apos o comando "Palavra:=SetColor(cor1,cor2)", um vai anular o outro concorda?, como fazer nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
mamp Posted April 12, 2009 Author Report Share Posted April 12, 2009 te_bmp = " " if "DESLIGA SEMPRE" $ por_c->pl_status te_bmp = "A" else if "LIGA SEMPRE" $ por_c->pl_status te_bmp = "G" else if "DESLIGADO" $ por_c->pl_status te_bmp = "D" else te_bmp = "L" endif endif endif &obmppor:varput(te_bmp) &obmppor:Refresh() pra me ajudar, onde coloco o SetColor? nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
aferra Posted April 13, 2009 Report Share Posted April 13, 2009 Se vc usou da forma postada anteriormente está totalmente errado, complementando o que vc pediu eu faço assim &obmppor:SetColor(,) &obmppor:varput(te_bmp) &obmppor:Refresh() Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX Seja Felizid=red> Quote Link to comment Share on other sites More sharing options...
mamp Posted April 13, 2009 Author Report Share Posted April 13, 2009 alessandro, dez, do jeito que eu precsava, obrigado nao uso WS Marcos Macedo(Recife-PE) macedomarcos@hotmail.com Quote Link to comment Share on other sites More sharing options...
ronaldo Posted April 13, 2009 Report Share Posted April 13, 2009 Para para esclarecer. o exemplo que vc havia colocado acima que não funcionou é pq vc esta criando uma variavel e procurando uma funcao SetText() que é veradede é um metodo então não coloque o sinal de " = ". Ronaldo Minacapelli (11) 2950 3069 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.