Compartilhar via


Propriedade Form.PaintPalette (Access)

Utilize a propriedade PaintPalette para especificar uma paleta a utilizar por um formulário. Variant de leitura/gravação.

Sintaxe

expressão. PaintPalette

expressão Uma variável que representa um objeto Form.

Comentários

Pode definir a propriedade PaintPalette com uma macro ou Visual Basic. A configuração da propriedade deve ser um tipo de dados de cadeia de caracteres contendo as informações de paleta.

Pode definir a propriedade PaintPalette ao atribuir o valor da propriedade ObjectPalette à propriedade PaintPalette numa macro ou Visual Basic ao definir a propriedade PaletteSource (nesse caso, o Microsoft Access define automaticamente a propriedade PaintPalette para esta PaletteSource) ou ao definir a propriedade PaintPalette de um formulário ou relatório para a propriedade PaintPalette de outro formulário ou relatório.

Para um formulário, você pode definir a propriedade PaintPalette no modo Design do formulário e o modo formulário.

Quando você define a propriedade PaintPalette, o Microsoft Access faz uma cópia da paleta que você especifica e salva com o formulário ou relatório. Paleta estará disponível se você modificar esse formulário ou relatório.

As alterações à paleta que especificou quando definiu a propriedade PaintPalette não afetam a cópia da paleta armazenada com o formulário ou relatório. Se você deseja atualizar a cópia da paleta armazenada com o formulário ou relatório, você deve executar novamente o código ou macro que define a propriedade PaintPalette ou redefinir a propriedade OrigemDaPaleta quando o formulário ou relatório é aberto.

Quando você define a propriedade PaintPalette para um formulário ou relatório, o Microsoft Access atualiza automaticamente sua propriedade OrigemDaPaleta. Inversamente, quando você define a propriedade OrigemDaPaleta para um formulário ou relatório, a propriedade PaintPalette também é atualizada. Por exemplo, quando você especifica uma paleta personalizada com a propriedade PaintPalette, a configuração da propriedade OrigemDaPaleta é alterada para (personalizada). A propriedade PaintPalette (que está disponível somente em uma macro ou o Visual Basic) é usada para definir a paleta para o formulário ou relatório. A propriedade OrigemDaPaleta proporciona uma maneira de definir a paleta para o formulário ou relatório na folha de propriedades, usando um arquivo gráfico existente.

Observação

Windows pode ter apenas uma paleta de cores ativa por vez. O Access permite-lhe ter vários gráficos num formulário, cada um com uma paleta de cores diferente. As propriedades PaintPalette e OrigemDaPaleta permitem que você especifique qual paleta de cores um formulário deve utilizar ao exibir gráficos.

Utilize a propriedade ObjectPalette para disponibilizar a paleta de uma aplicação associada a um objeto OLE, mapa de bits ou outro gráfico contido num controlo num formulário ou relatório para a propriedade PaintPalette . Por exemplo, para disponibilizar a paleta utilizada no Graph ao estruturar um formulário no Access, defina a propriedade PaintPalette do formulário para o valor ObjectPalette de um controlo de gráfico existente.

Exemplo

As propriedades ObjectPalette e PaintPalette são úteis para alterar programaticamente a paleta de cores em uso por um formulário aberto em tempo de execução. Um uso comum dessas propriedades é definir a propriedade PaintPalette do formulário atual como a paleta de um gráfico exibido em um controle que tem o foco.

Por exemplo, você pode ter um formulário com uma figura do oceano, mostrando muitos tons de azul e uma figura do pôr do sol, mostrando muitos tons de vermelho. Uma vez que o Windows permite apenas uma paleta de cores ativa de cada vez, uma imagem terá um aspeto muito melhor do que a outra.

O exemplo seguinte utiliza o evento Enter de um controlo para definir a propriedade PaintPalette do formulário para a propriedade ObjectPalette do controlo para que o gráfico com o foco tenha um aspeto ideal.

Sub OceanPicture_Enter() 
 Me.PaintPalette = Me!OceanPicture.ObjectPalette 
End Sub 
 
Sub SunsetPicture_Enter() 
 Me.PaintPalette = Me!SunsetPicture.ObjectPalette 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.