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]Wingdings Caracter - Centrar em função de tamanho outro campo

    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 354
    Registrado : 28/10/2010

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  zcarloslopes em 23/9/2019, 09:39

    Bom dia,

    Mais uma vez venho pedir a vossa ajuda.

    Preciso que uma TexBox de um relatório exiba um caractere Wingdings. Mais precisamente o símbolo do telefone..

    O código do símbolo no Word é: 40 decimal ou 0028 hex.

    Tentei:
    Código:
    Me.TextBox = Chr(0028)
    Me.TextBox = Chr(40)
    Me.TextBox = ChrW(0028)
    Me.TextBox = ChrW(40)

    Mas neste caso aparecem outros símbolos..

    Pesquisei então e verifiquei que o código do símbolo seria U+260xE

    Mas não estou a ter sucesso.

    Alguma dica?

    Obrigado


    Última edição por zcarloslopes em 24/9/2019, 15:35, editado 1 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  ahteixeira em 24/9/2019, 10:06

    Olá Carlos,

    No relatório o tipo de letra está correto?
    Já tentou colocar diretamente no relatório? (copiar do word (control+c) e colar (control+v) num rótulo por exemplo?

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 354
    Registrado : 28/10/2010

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  zcarloslopes em 24/9/2019, 10:25

    Bom dia ahteixeira,

    Obrigado por tentar ajudar...

    O (control+c) e (control+v) a partir do word não funcionam...

    No caso de alterar o tipo de letra da TextBox para Wingdings, o código "Me.TextBox = Chr(40)" aparece o símbolo correto, no entanto o restante texto fica como símbolos também.

    Eu pretendia algo como:
    Código:
    Me.TextBox = Chr(40) & "Texto simples" & Me.TextBoxTeste 'Etc, etc

    Obrigado
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  ahteixeira em 24/9/2019, 11:03

    Olá, pois é.  Very Happy

    Acho que vai ter que ajustar com dois campos separados (cada qual com o respectivo tipo de letra)

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 354
    Registrado : 28/10/2010

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  zcarloslopes em 24/9/2019, 11:11

    Obrigado ahteixeira,

    É esse o caminho que já estou a tentar seguir.., mas tem outro pequeno problema que aproveito para lhe perguntar também...

    No caso, o texto será para ficar centrado no rodapé do relatório (exigência do modelo a seguir)...

    Tem como ajustar as duas TextBox para que o texto fique centrado, tendo em conta que o mesmo texto não é fixo?

    Obrigado
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  ahteixeira em 24/9/2019, 12:27

    Olá Carlos Lopes,

    Deu poucos detalhes do que pretende fazer, mas tudo depende onde quer colocar o "icon" do telefone.
    Inicio ou meio do texto.

    Fiz este exemplo para um colega que faz a "manipulação" na vertical, a ideia poderá ser a mesma para a horizontal.
    https://www.maximoaccess.com/t30888-exemplo-termometro-grafico-na-vertical

    Não sei se ajuda, mas fica esta sugestão.

    Abraço
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 354
    Registrado : 28/10/2010

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  zcarloslopes em 24/9/2019, 12:45

    Obrigado ahteixeira,

    Vou dar uma olhada no seu exemplo..

    Deixo aqui um exemplo do que pretendo para melhor explicação.

    Obrigado
    Anexos
    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo AttachmentExemplo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (14 Kb) Baixado 4 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  ahteixeira em 24/9/2019, 14:54

    Olá Carlos Lopes,

    Com estas linhas de código, foi o melhor que consegui.
    Código:

     Me.txt = "Esta é a formatação de texto e o símbolo pretendido"
     Me.txtS = Chr(40) & Space((Len(Me.txt) / 2) + 1)

    Segue o meu teste.

    Abraço
    Anexos
    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo AttachmentCentrarDoisCamposReporteComFontesDiferentes.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (16 Kb) Baixado 7 vez(es)
    avatar
    zcarloslopes
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 354
    Registrado : 28/10/2010

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  zcarloslopes em 24/9/2019, 15:35

    Obrigado ahteixeira pela ajuda..,

    Não ficou 100% prefeito, mas resolve o meu propósito...

    O espaço entre o símbolo e o texto altera em função do tamanho de letra, assim como do comprimento do texto...

    O tamanho de letra é sempre o mesmo (resolvido).., para a variação do comprimento do texto consegui um equilíbrio aceitável assim:
    Código:
    Me.txtS = Chr(40) & Space((Len(Me.txt) / 2.4) + 1)

    Resta-me agradecer mais uma vez a ajuda.

    Obrigado!
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo Empty Re: [Resolvido]Wingdings Caracter - Centrar em função de tamanho outro campo

    Mensagem  ahteixeira em 24/9/2019, 17:24

    Olá Carlos Lopes,

    Obrigado, fico feliz por ter resolvido.
    Alterei o título do tópico para ficar mais fácil para as pesquisas.

    Abraço

      Data/hora atual: 29/11/2020, 18:58