locked
Mostrar Imagem em Formulário RRS feed

  • Pergunta

  • Bom dia,

    Tenho um banco de dados onde gravo o caminho da imagem num determinado campo. Agora, como faço para mostrar num formulário a foto. O caminho está assim: C:\Fig\nome da figura.

    No formulário eu coloquei um Quadro de Objeto Acoplado. Seria esse o objeto para mostrar a imagem?

    José Antunes

    terça-feira, 25 de julho de 2006 14:08

Respostas

  • Oi J. Antunes,

     

    use um controle Imagem (selecione uma figura qualquer para ele entrar no formulário), e no evento Form_Current (no atual) você define a propriedade Picture do controle:

    Me.TeuControleImagem.Picture = "c:\Tuapasta\TuaFigura.jpg"

     

    terça-feira, 25 de julho de 2006 23:13
    Moderador

Todas as Respostas

  • Oi J. Antunes,

     

    use um controle Imagem (selecione uma figura qualquer para ele entrar no formulário), e no evento Form_Current (no atual) você define a propriedade Picture do controle:

    Me.TeuControleImagem.Picture = "c:\Tuapasta\TuaFigura.jpg"

     

    terça-feira, 25 de julho de 2006 23:13
    Moderador
  • Bom dia Luiz.

    Fiz como você mandou. mas não funcionou.

    O que pode estar errado.

    Quero que quando mudar de registro, também mude a imagem.

    Obrigado

    J. Antunes

    quarta-feira, 26 de julho de 2006 13:39
  • Olá, Bom dia

    Tá resolvido, deu certo agora.

    Obrigado

    J. Antunes

    quinta-feira, 27 de julho de 2006 13:21
  • É do jeito que eu falei, no evento Form_Current (No atual).

    Poste aqui exatamente o código que utilizou e o erro que ocorreu.

    sexta-feira, 28 de julho de 2006 01:48
    Moderador
  • Bom dia,

    Luiz, fiz exatamente como voce mandou. Não sei porque na primeira tentativa não deu certo.

    O código é esse:

    If Not IsNull(Foto)  Then
           Me.Figura.Picture = Foto
        Else
         Foto = ""
        End If

    Agora quando eu saio do último registro para a inclusão de um outro, dá erro, porque é lógico,

    ele não encontra uma imagem. Então tentei colocar aquelas linhas acima(If Not Is Null...), mais não deu certo.

    J. Antunes

    segunda-feira, 31 de julho de 2006 15:55
  • Oi J. Antunes,

     

    no "Else", você tem que dizer que

    Me.Figura.Picture = ""

     

    segunda-feira, 31 de julho de 2006 23:46
    Moderador
  • Obrigado, Luiz

    É assim mesmo, funcionou.

    J. Antunes

    terça-feira, 1 de agosto de 2006 13:13