MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Modificar Paint VBA - Coordenadas

    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 1/6/2016, 21:52

    Boa Tarde.
    garimpando por ai encontrei esse aplicativo na versão 97, que compilei para 2003  e 2007.
    Esta compilação "imita um paint" simples no VBA.
    troquei a imagem nativa por uma que precisava que fosse marcada de acordo com a lesão apresentada.
    Todavia... muda só a cor do desenho.
    Precisaria que fosse "exportado esse desenho depois.
    Alguém poderia ajudar?
    Obrigado
    Anexos
    [Resolvido]Modificar Paint VBA - Coordenadas AttachmentPaint.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (138 Kb) Baixado 27 vez(es)
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 10/6/2016, 12:04

    Bom dia.
    Alguém poderia ajudar?
    Obrigado
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 12/6/2016, 18:25

    Boa tarde.
    Alguém teria uma ideia?
    Obrigado.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6997
    Registrado : 15/03/2013

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  ahteixeira em 13/6/2016, 17:57

    Olá, não vi exemplo que postou.
    No entanto a solução seria ter uma imagem de fundo e pintar no form aa lesões.
    Não sei se será possível, Veja se link abaixo ajuda
    http://www.google.pt/search?q=drawing+circle+vba+access&oq=drawing+circle+vba+access&gs_l=mobile-heirloom-serp.12...338413.341025.0.344721.7.7.0.0.0.0.318.1420.0j4j2j1.7.0....0...1c.1.34.mobile-heirloom-serp..4.3.528.w59aoLr1cBE

    Caso seja possível desenhar objectos, apenas seria necessário guardar em tabela as cordenadas e tipo de.desenho.
    Ao abrir, caso tivesse dados fazias os desenhos.
    Ao sair, guardava.

    Mais um link
    http://www.vbaexpress.com/forum/showthread.php?31833-Solved-Use-of-AddShape-to-add-circle

    Fica ideia.
    Abraço
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 13/6/2016, 23:21

    Oi
    AhTeixeira
    Vi sua dica.
    só que realmente não sei implementar.
    Tentei utilizar a classe do paint que anexei e que vc viu no repositório.
    Se usar numa foto funciona.
    mas o que precisava é que já abrisse na imagem que coloquei no form.
    e quando usasse o aplicativo marcasse a figura, podendo salvar de ver depois associado no paciente.
    Veja o que consegui.
    rsrs
    pouco.
    rs
    Anexos
    [Resolvido]Modificar Paint VBA - Coordenadas AttachmentPaint 2007 versão 1 teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (41 Kb) Baixado 16 vez(es)
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 14/6/2016, 01:23

    Boa noite
    Navegando em foruns encontrei esse maravilhoso exemplo que ajuda de forma especial.
    tentei trocar a imagem onde é feita a assinatura pela outra imagem anexada junto.
    Infelizmente não funcionou.
    se alguém puder ajudar nisso será perfeito.
    obrigado.
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 15/6/2016, 21:03

    Credito que a solução seja pela classe criada pelo Stephen Lebans.
    Vou tentar entender
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6997
    Registrado : 15/03/2013

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  ahteixeira em 19/6/2016, 13:52

    Olá Mylton Nogueira,

    Quanto ao signature, agradeço a partilha, mais um excelente exemplo.

    A solução de fazer em Ms Paint as várias imagens, não seria o mais adequado.
    Pois caso tivesse 1000 pacientes seria esse numero vezes a imagem.
    No entanto no tópico abaixo tem a solução para ediar:
    https://www.maximoaccess.com/t27019-por-que-a-tela-do-ms-paint-usando-vba-abre-preta

    Nesse mesm tópico, tem a referencia do nosso colega Avelino Sampaio de um excelente exemplo que criou, que vai de encontro precisamente do que relatava na minha mensagem nº 4 "coordenadas"
    Fica aqui o link:
    http://www.redeaccess.com.br/viewtopic.php?f=7&t=749

    Se assim o entender, acho que poderá dar este tópico como resolvido.
    Abraço
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 23/08/2010

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  Mylton em 19/6/2016, 18:12

    Boa tarde
    Obrigado a todos que ajudaram.
    Resolvido por aqui.
    https://www.maximoaccess.com/t27019-por-que-a-tela-do-ms-paint-usando-vba-abre-preta#190594
    Gde Abs
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6997
    Registrado : 15/03/2013

    [Resolvido]Modificar Paint VBA - Coordenadas Empty Re: [Resolvido]Modificar Paint VBA - Coordenadas

    Mensagem  ahteixeira em 21/6/2016, 14:32

    cheers

      Data/hora atual: 26/1/2021, 15:49