USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Fundo Degradê - Converter RGB
Eledio Junior
Pontos: 2843
CAÇADOR
SC - BRASIL
ENUNCIADA !
Postada em 22/09/2004 12:18 hs         
Fiz uma função parecida com e do post http://www.vbweb.com.br/forum_resp.asp?Codigo=139626 porém quero que o cliente selecione a cor que deverá ser montando o degradê... ou até mesmo as duas cores que se devem interagir para montar o Degradê, porém estou barrado no problema de como transformar o valor Long de um cor em RGB, e onde eu estipulo onde o laço de repetição deve diminuir para dar a impressão de degradê...
Em algumas documentações que verifiquei achei a seguinte função, que dizia converter em RGB:
 
    Red = (RGBInt / 65536) Mod 256
    Green = (RGBInt / 256) Mod 256
    Blue = RGBInt Mod 256
 
Porém não funciona... em algumas cores por coincidência sim, mas na maioria não.
 
 
Minha Idéia foi a Seguinte:
 
For I = 0 To 255
    Picture1.Line (0, intLoop)-(Screen.Width, intLoop - 1), RGB(8, 0, I)
Next I

Até ai Blz pois a cor está especificada...
Enfium alguém conhece a forma para calcular o RGB de uma Cor em Long
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2022   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página