MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Modificar Paint VBA

    Compartilhe

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Qua 01 Jun 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
    Paint.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (138 Kb) Baixado 14 vez(es)

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Sex 10 Jun 2016, 12:04

    Bom dia.
    Alguém poderia ajudar?
    Obrigado

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Dom 12 Jun 2016, 18:25

    Boa tarde.
    Alguém teria uma ideia?
    Obrigado.

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  ahteixeira em Seg 13 Jun 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
    [Você precisa estar registrado e conectado para ver este link.]

    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
    [Você precisa estar registrado e conectado para ver este link.]

    Fica ideia.
    Abraço

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Seg 13 Jun 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
    Paint 2007 versão 1 teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (41 Kb) Baixado 6 vez(es)

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Ter 14 Jun 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.
    Anexos
    Signature.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.9 Mb) Baixado 7 vez(es)

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Qua 15 Jun 2016, 21:03

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

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  ahteixeira em Dom 19 Jun 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:
    [Você precisa estar registrado e conectado para ver este link.]

    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:
    [Você precisa estar registrado e conectado para ver este link.]

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

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  Mylton em Dom 19 Jun 2016, 18:12

    Boa tarde
    Obrigado a todos que ajudaram.
    Resolvido por aqui.
    [Você precisa estar registrado e conectado para ver este link.]
    Gde Abs

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Modificar Paint VBA

    Mensagem  ahteixeira em Ter 21 Jun 2016, 14:32

    cheers

      Data/hora atual: Sab 10 Dez 2016, 06:47