DetailPage-MSS-KB

Base de Dados de Conhecimento

ID do artigo: 148463 - Última revisão: sexta-feira, 19 de janeiro de 2007 - Revisão: 3.3

 
Avançadas: Requer especialista de codificação, interoperabilidade e habilidades de multiusuário.

Nesta página

Sumário

Este artigo mostra como você pode exibir imagens de bitmap em um formulário ou em um relatório com apenas o caminho e o nome de arquivo armazenado na tabela do Microsoft Access.

Este artigo presume que você está familiarizado com Visual Basic for Applications e que você esteja familiarizado com a criação de aplicativos do Microsoft Access usando as ferramentas de programação fornecidas com o Microsoft Access.

Para obter mais informações sobre o Visual Basic for Applications, consulte sua versão do manual "Criando aplicativos com o Microsoft Access".

Observação : o Visual Basic for Applications é chamado Access Basic no Microsoft Access versão 2.0. Para obter mais informações sobre o Access Basic, consulte o manual "Building Applications".

Mais Informações

Às vezes não é prático armazenar imagens em uma tabela do Microsoft Access. Se você tiver um grande número de imagens, ou se cada um dos seus arquivos de imagem for grande, o tamanho do arquivo de banco de dados do Microsoft Access pode aumentar rapidamente.

Os exemplos a seguir mostram como exibir imagens de bitmap do Windows em um formulário do Microsoft Access e em um relatório sem armazenar as imagens em uma tabela do Microsoft Access.

No Microsoft Access 97 e 7.0

Criar a tabela de dados de caminho e arquivo de armazenamento

  1. Abra o banco de dados de exemplo Northwind.mdb.
  2. Criar uma nova tabela é denominada Imagetable e adicione um campo de texto que é chamado ImagePath.
  3. Abra a tabela Imagetable no modo folha de dados e adicione o caminho e nome de um arquivo de bitmap para cada registro. Os exemplos a seguintes mostram como os registros podem parecer:
          c:\windows\circles.bmp
          c:\windows\waves.bmp
          c:\windows\tiles.bmp
          c:\windows\bubbles.bmp
    					

Exibir imagens em um formulário

  1. Use o AutoFormulário: Colunar Assistente para criar um novo formulário que é baseado na tabela ImageTable.
  2. Abra o formulário Imageform no modo de design e, em seguida, adicione um controle de imagem ao formulário usando a ferramenta de imagem na caixa de ferramentas. Você será solicitado a selecionar uma imagem para inserir. Selecione qualquer imagem disponível no seu computador. O nome do controle ImageFrame.
  3. Defina a propriedade NoAtual do formulário Imageform para o seguinte procedimento de evento:
          Private Sub Form_Current()
             On Error Resume Next
             Me![ImageFrame].Picture = Me![ImagePath]
          End Sub
    						
  4. Defina a propriedade AfterUpdate da caixa de texto ImagePath como o seguinte procedimento de evento:
          Private Sub ImagePath_AfterUpdate()
             On Error Resume Next
             Me![ImageFrame].Picture = Me![ImagePath]
          End Sub
    						
  5. Abra o formulário Imageform no modo de formulário. Observe que o formulário exibe o bitmap correspondente a cada registro.

Exibir imagens em um relatório

  1. Você pode usar o Assistente de AutoRelatório para criar um novo relatório é baseado na tabela ImageTable. Nomeie o relatório ImageReport .
  2. Abra ImageReport no modo de design e adicione um controle de imagem para o relatório usando a ferramenta de imagem na caixa de ferramentas. Você será solicitado a selecionar uma imagem para inserir. Selecione qualquer imagem que está disponível no seu computador. O nome do controle ImageFrame .
  3. Defina o evento Format da seção "Detalhes" o relatório como o seguinte procedimento de evento:
          
          Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
             Me![Imageframe].picture = me![Imagepath]
          End Sub 
    						
  4. Abra o ImageReport no modo de visualização. Observe que o relatório exibe o bitmap correspondente a cada registro.

No Microsoft Access 2.0

Criar a tabela de dados de caminho e arquivo de armazenamento

  1. Abra o banco de dados de exemplo nwind.mdb.
  2. Criar uma nova tabela é denominada Imagetable e adicione um campo de texto que é chamado ImagePath.
  3. Abra a tabela Imagetable no modo folha de dados e adicione o caminho e nome de um arquivo de bitmap para cada registro. Os exemplos a seguintes mostram como os registros podem parecer:
          c:\windows\circles.bmp
          c:\windows\waves.bmp
          c:\windows\tiles.bmp
          c:\windows\bubbles.bmp

Exibir as imagens em um formulário

  1. Use o Assistente de AutoFormulário para criar um novo formulário baseado na tabela ImageTable. Nome do formulário Imageform.
  2. Abra o formulário Imageform no modo de design e em seguida, adicione um quadro de objeto não acoplado usando na ferramenta moldura de objeto não acoplado, na caixa de ferramentas. O nome do controle ImageFrame.
  3. Defina a propriedade NoAtual do formulário Imageform para o seguinte procedimento de evento:
          Private Sub Form_Current()
             On Error Resume Next
             If Not IsNull(Me![ImagePath]) Then
             Me![ImageFrame].OLETypeAllowed = 1
             Me![ImageFrame].SourceDoc = Me![Imagepath]
             Me![ImageFrame].Action = 0
             End If
          End Sub
    						
  4. Defina a propriedade ApósAtualizar da caixa de texto ImagePath como o seguinte procedimento de evento:
          Sub ImagePath_AfterUpdate ()
             On Error Resume Next
             Me![ImageFrame].OLETypeAllowed = 1
             Me![ImageFrame].SourceDoc = Me![Imagepath]
             Me![ImageFrame].Action = 0
          End Sub
    						
  5. Defina as seguintes propriedades para o quadro de objeto não acoplado ImageFrame:
           Enabled: Yes<BR/>
           Locked: No
        
    					
  6. Abra o Imageform no modo formulário. Observe que o formulário exibe o bitmap correspondente a cada registro.
Observação : no Microsoft Access 97 e versão 7.0, o formulário não exibe qualquer imagem se um caminho não é válido ou um nome de arquivo não é válido é adicionado à tabela ImageTable. No entanto, a interceptação de erro pode ser implementada para um grau adicional para certificar-se que um caminho válido e um nome de arquivo válidos são inseridos. No Microsoft Access 2.0, o formulário ignora o erro e, em seguida, exibe o bitmap mais recente no formulário.

Referências

Para obter mais informações sobre a propriedade OleTypeAllowed , pesquisar o índice da Ajuda OleTypeAllowed e, em seguida, propriedade OleTypeAllowed ou peça ao Assistente do Office do Microsoft Access 97.

Para obter mais informações sobre a propriedade Sourcedoc , pesquisar o índice da Ajuda Sourcedoc e, em seguida, propriedade DocDeOrigem ou peça ao Assistente do Office do Microsoft Access 97.

A informação contida neste artigo aplica-se a:
  • Microsoft Access 2.0 Standard Edition
  • Microsoft Access 95 Standard Edition
  • Microsoft Access 97 Standard Edition
Palavras-chave: 
kbmt kbhowto kbinterop kbprogramming KB148463 KbMtpt
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 148463  (http://support.microsoft.com/kb/148463/en-us/ )
Retired KB ArticleAviso de Isenção de Responsabilidade sobre Conteúdo do KB Aposentado
Este artigo trata de produtos para os quais a Microsoft não mais oferece suporte. Por esta razão, este artigo é oferecido "como está" e não será mais atualizado.
Compartilhar
Opções de suporte adicionais
Fóruns de Suporte do Microsoft Community
Contate-nos diretamente
Localize um parceiro certificado da Microsoft
Microsoft Store