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


    [Resolvido]Ocultar código XML

    Bão
    Bão
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 04/05/2011

    [Resolvido]Ocultar código XML Empty [Resolvido]Ocultar código XML

    Mensagem  Bão 23/1/2012, 02:26

    Estou com uma dúvida...

    Quando um texto é editado numa textbox configurada para "rich text" a linguagem xml é inserida no texto da tabela...

    Mas ao visualizar o mesmo texto numa textbox "sem formatação" (normal)... todo esse código aparece...

    A dúvida: existe alguma maneira de ocultar este código e mostrar apenas o texto? isso sem estar numa textbox "rich text"? e o usuário poder digitar na textbox?...

    É que consegui resolver uma dificuldade envolvendo o Ctrl+V colocando uma textbox inicial "sem formatação" e outra oculta como "rich text" invisível, que só é mostrada quando o usuário clica num botão " formatar"...

    Mas após formatar o texto e retornar para a textbox inicial o código xml aparece... isso pode deixar o usuário confuso... seria algo apenas visual... espero que haja uma maneira...

    Desde já agradeço toda ajuda!
    Bão
    Bão
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 04/05/2011

    [Resolvido]Ocultar código XML Empty Re: [Resolvido]Ocultar código XML

    Mensagem  Bão 27/1/2012, 00:12

    Após torar os miolos... cheguei a uma solução... tive a idéia de fazer uma "área de transferência" própria que retira todos os códigos XML... na verdade apenas um formulário com uma textbox com texto "sem formatação"...

    Coloquei no evento "ao apertar a tecla control" um comando para abrir o form "área de transferência", colar o texto, selecioná-lo e copiá-lo (assim o texto fica sem formatação)...

    Daí voltar para o form inicial... só que empaquei aí... pois o cursor volta para o início do da textbox, e gostaria que ficasse onde estava... como se nunca tivesse saído dali...

    Alguma sugestão... agradeço a todos... com fé no Cristo vou conseguir... cheers
    Bão
    Bão
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 105
    Registrado : 04/05/2011

    [Resolvido]Ocultar código XML Empty Re: [Resolvido]Ocultar código XML

    Mensagem  Bão 27/1/2012, 22:38

    Encontrei uma dica do criquio, mas não funcionou:

    Caso ainda não tenha resolvido, deixo uma dica:
    Coloque no início do módulo do formulário, após a primeira linha e caso ainda não tenha, a linha abaixo:
    Option Explicit

    Logo após essa linha acima, coloque:
    Dim Pos As Integer

    Agora, nos eventos "Ao liberar mouse" e "Ao liberar tecla" do seu campo, coloque:
    Pos = Me.NomeDoCampo.SelStart
    Com isso, será sempre atribuída a posição do cursor dentro do campo à cada vez que liberar uma tecla ou liberar o mouse dentro desse campo. À partir daí, você pode usar essa posição aonde precisar.


    Se alguém puder ajuda... acho que é isso que estou precisando...http://maximoaccess.forumeiros.com/t3595-resolvidoprocurar-posicao-do-cursor?highlight=cursor
    avatar
    Convidad
    Convidado


    [Resolvido]Ocultar código XML Empty Re: [Resolvido]Ocultar código XML

    Mensagem  Convidad 28/1/2012, 11:18

    Olá viludo

    Esssa função vai funcionar sim é só usar de artimanha.

    Assim:
    Para que ela funcione, o texto tem que estar na caixa de texto em questão.
    Técnica:
    Para que o usuário não veja o texto, deixe a caixa de texto com o forecolor igual ao fundo
    Cole o texto nela
    use o pos = Len(Me.CaixaDeTexto) + 1 para a contagem de carácteres
    volte a pintar o forecolor da caixa de texto e use o pos=Me.CaixaDeTexto.SelStart.

    Editando:
    Como você coloca o texto no formulário de Transferencia, pode contar os caracteres nele
    e então colocar ele na caixa de texto sem precisar mudar a cor da fonte.


    O caminho é esse.
    Espero ter ajudado

    Abraços

    Conteúdo patrocinado


    [Resolvido]Ocultar código XML Empty Re: [Resolvido]Ocultar código XML

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 08:54