MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    Exibir várias imagens em um formulário

    avatar
    cjnfreitas
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 22/02/2016

    Exibir várias imagens em um formulário Empty Exibir várias imagens em um formulário

    Mensagem  cjnfreitas 23/2/2016, 17:08

    Acabei me expressando mal no outro tópico.

    Tenho um formulário que necessita de imagens. Essas imagens são salvas em uma pasta com a mesma ID da Record.

    Como fazer uma caixa que exiba essas imagens contidas na pasta, sendo que para cada Record a caixa precise procurar a pasta específica a ela (com sua ID: C:\150, C:\151, C:\152).
    Como fazer para que a caixa me deixe selecionar as imagens, e então grave o caminho delas em uma tabela separada junto com a ID da Record aberta, para então exibir as imagens dessa ID. (Nesse caso, seria um botão para selecionar e uma caixa para exibir).
    E, se possível, setas para navegação entre as imagens

    Obrigado! cheers
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    Exibir várias imagens em um formulário Empty Re: Exibir várias imagens em um formulário

    Mensagem  crysostomo 4/2/2019, 23:04

    Deixa eu ver se entendi. Vc quer que cada cadastro puxe a foto, certo?
    Aqui você pega e inseri a imagem ela grava o caminha da imagem na tabela
    Código:
    Private Sub inserirfotos_Click()
    Dim s As String
    s = OpenCommDlg()
    If s <> "" Then
        foto = s
        foto_AfterUpdate
     
     End If
    End Sub
    Private Sub Form_Current()

    foto_AfterUpdate

    End Sub
    Private Sub foto_AfterUpdate()

    Dim s As String
    s = Nz(foto.Value, "")
    If s <> "" Then s = IIf(Dir(s) = "", "", s)
    On Error Resume Next
    Imagem3.Picture = s
    If err.Number <> 0 Then Imagem3.Picture = ""
    On Error GoTo 0
    End Sub

    Aquipara você puxar a imagem no evento ao clicar ca caixa de combinação aonde vai puxar os dados que precisa
    Código:

    Me.controleDaimagem.Picture = cboPreencheFica.Column(Número da coluna aonde está armazenado o caminho da imagem)
    klaytontome
    klaytontome
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 19/03/2017

    Exibir várias imagens em um formulário Empty Re: Exibir várias imagens em um formulário

    Mensagem  klaytontome 18/2/2019, 19:14

    Question acho que estou com a mesma necessidade!

    Gostaria de cadastrar no mesmo item várias imagem, e ter como exibir em formulário e relatório. ?
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2746
    Registrado : 23/01/2018

    Exibir várias imagens em um formulário Empty Re: Exibir várias imagens em um formulário

    Mensagem  crysostomo 18/2/2019, 19:23

    Boa tarde Klayton , vê se esse te ajuda.
    Se você quer várias fotos pode colocar na tabela um anexo, mas não muito recomendado dependendo da quantidade de cadastro, as fotos incha na tabela , ou você pode fazer como está o código acima.
    https://www.maximoaccess.com/t35021-relatorio-com-foto-lado-a-lado-tipo-etiquetas

    Conteúdo patrocinado


    Exibir várias imagens em um formulário Empty Re: Exibir várias imagens em um formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 20:06