Criando Cores pelo Delphi
Página 1 de 1 • Compartilhe •
Criando Cores pelo Delphi
No evento oncreat coloque:
var
Cor1, Cor2, Cor3: byte;//As cores devem ser colocadas em byte
CorFormada: TColor;//tcolor porque a funcao e em RGB
begin
Cor1:=25;
Cor2:=33;
Cor3:=255;
Corformada := TColor(RGB(Cor1, Cor2, Cor3));
Form1.Color := Corformada; //retorna a cor formada
Créditos:Aboult
var
Cor1, Cor2, Cor3: byte;//As cores devem ser colocadas em byte
CorFormada: TColor;//tcolor porque a funcao e em RGB
begin
Cor1:=25;
Cor2:=33;
Cor3:=255;
Corformada := TColor(RGB(Cor1, Cor2, Cor3));
Form1.Color := Corformada; //retorna a cor formada
Créditos:Aboult

spandre- Membro de Honra

- Mensagens: 120
Agradecimentos: 16
Data de inscrição: 02/03/2011
Tópicos similares» CORES PARA O TRACKMANIA
» Mortal Cheats Preview - Área Delphi/VB
» Atualização do Galaxy SII pelo Kies já saiu
» Hydron resgate pelo Mantris (dono:Dan)
» Criando um navegador (WebBrowser) no VB6
» Mortal Cheats Preview - Área Delphi/VB
» Atualização do Galaxy SII pelo Kies já saiu
» Hydron resgate pelo Mantris (dono:Dan)
» Criando um navegador (WebBrowser) no VB6
Página 1 de 1
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum





» NX-Suspend e NX-Injector Novo!
» Removido
» Removido
» Arrumem logo esse problema!
» Parceria CrieSites Fórum
» Kino no Tabi
» wall hak funcional [CF AL]
» Update-GM-Simples-MocroGunz-V7-AllHax