Projeto paint – sétima parte

Agora vamos trabalhar com os botões. Usá-los-emos para alternar entre os tipos de atividades que desenvolveremos no componente Image (exemplo: riscar, pintar etc). Alteremos a propriedade Name:

Agora, para relacioná-los num grupo único, altere a propriedade GroupIndex de todos eles para 1. Altere a propriedade Down do SpdLaps para true (na inicialização do programa, ele estará selecionado). Para colocar um efeito 3D nos botões, basta alterar a propriedade Flat deles para true. Use a propriedade Glyph para escolher alguma figura para os botões. Obviamente, as figuras devem corresponder à função de cada botão e possuir tamanho equivalente ao tamanho dos botões.

Vamos colocar alguns códigos no SpdLaps, o qual será usado para fornecer o comando que nos permitirá riscar as imagens com linhas. Antes, porém, digite o seguinte código no evento OnMouseMove de Image1, apenas para vermos como é fácil produzir riscos no componente, usando o objeto Canvas.

Se testar o programa agora, verá que já pode produzir riscos em Image1, seja numa figura nova ou numa figura carregada de seus arquivos.

Nota: suspenderemos o projeto Paint por alguma lições, a fim de abordarmos tópicos importantes relacionados ao tema.