[Delphi]Trabalhando com Canvas em Uma TImage

[AceStryker 25]

Introdução

Olá a todos da WC, hoje eu vou ensinar como trabalhar com Canvas no componente TImage, o que pode ser muito útil.

O que precisamos saber a principio?

Bem, o Canvas é uma função para componentes visuais, ele basicamente "desenha" qualquer coisa manualmente em sua aplicação, neste tutorial iremos entender como usa-lo.

 

Escrevendo Textos

Bom, esta função na minha opinião, é a mais simples que tem, ela simplesmente desenha um texto onde você quer em um componente visual, vamos escrever na imagem agora:

No Evento OnCreate digite:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

O que fizemos?

Apenas escrevemos WC OWNA na imagem no lugar 15x20 da imagem.

O Resultado sairá:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Desenhando Circulos

 

Esta função também é simples mas precisa de um conceito básico de geometria, desenharemos um circulo transparente colocando suas proporções assim:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Criamos um circulo transparente em 15x20 com a proporção de 100

Resultado:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Agora desenharemos um circulo não transparente:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Teremos um mesmo resultado, por isso não postarei outra imagem.

 

Desenhando Imagens Específicas

Para desenhar imagens específicas precisaremos usar um TGraphic, no meu caso, usarei uma JPEG, então adicione nas uses JPEG e nas variaveis globais:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E adicione no OnCreate:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Seu resultado dependerá da imagem que usou, o meu resultado foi:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Nota:Eu tive que converter a imagem do fórum para JPEG já que usar imagens PNG no delphi não é muito aconselhável.

 

Desenhando Linhas

 

Desenhar uma linha é bem útil para criar sublinhados e etc, e é bem simples, segue o exemplo abaixo:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Você esta desenhando uma linha de uma direção à outra.

 

Resultado

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Outras Funções - By Planeta Delphi

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Bom, espero que tenham gostado, e espero que seja útil.Até Mais.

[~EvilCode 78]

Muito bom, vai ajudar bastante quem está começando... :)

Realmente é bem legal mexer com canvas, da pra fazer muito mais em muitos outros lugares também..

[- NOOB 1]

Muito bom ace, sempre explicando legal ,dando exemplos,ficou ótimo :]

Abraçs!

[~OwneR~ 8]

Muito bom manolo ^^

Só discordo aqui:

Nota:Eu tive que converter a imagem do fórum para JPEG já que usar imagens PNG no delphi não é muito aconselhável.

PNG pra mim é o melhor formato, já que você pode trabalhar com o canal Alpha. Pena que o D7 não tem suporte nativo, mas existe o PNGImage que é muito bom ^^

[AceStryker 25]

Muito bom manolo ^^

Só discordo aqui:

 

PNG pra mim é o melhor formato, já que você pode trabalhar com o canal Alpha. Pena que o D7 não tem suporte nativo, mas existe o PNGImage que é muito bom ^^

 

Me expressei errado, queria dizer que o D7 nativo é uma luta para conseguir usar png nele.