Bom dia senhores, tenho um relatório com um controle caixa de texto que tem dimensões fixa, e dependendo do tamanho do texto que foi digitado a sua impressão não aparece no relatório. Não posso colocar a propriedade "poder ampliar" para sim, por que quero seu tamanho fixo na página. A solução seria diminuir o tamanho da fonte, do controle, em tempo de execução, no evento "Ao formatar" da seção detalhe. Como desenvolver a lógica que calculasse automaticamente e diminuísse a fonte do texto.
3 participantes
[Resolvido]Redimensionar texto em caixa de texto fixa.
wlac- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4
Registrado : 12/11/2010
- Mensagem nº1
Redimensionar texto em caixa de texto fixa.
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Olá! Seja bem vindo ao fórum!
O mais prático para esse caso seria você usar uma fonte na qual todas as letras tenham a mesma largura. Com isso você pode multiplicar a quantidade de caracteres pela largura da letra:
Me.NomeDoCampo.Width = Len(Me.NomeDoCampo) * 50 ' Exemplo
Caso queira usar uma fonte diferente das que tem no Windows por padrão, podes pesquisar na net por "fontes de largura fixa".
O mais prático para esse caso seria você usar uma fonte na qual todas as letras tenham a mesma largura. Com isso você pode multiplicar a quantidade de caracteres pela largura da letra:
Me.NomeDoCampo.Width = Len(Me.NomeDoCampo) * 50 ' Exemplo
Caso queira usar uma fonte diferente das que tem no Windows por padrão, podes pesquisar na net por "fontes de largura fixa".
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
Avelino Sampaio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3900
Registrado : 04/04/2010
Ou veja se atende este tipo de configuração:
http://maximoaccess.forumeiros.com/t12484-resolvidoajustar-altura-dos-campos-do-relatorio-automaticamente?highlight=dimensionar+relat%C3%B3rio
Sei que altera o tamanho do campo neste caso mas preserva a estética.
Sucesso!
http://maximoaccess.forumeiros.com/t12484-resolvidoajustar-altura-dos-campos-do-relatorio-automaticamente?highlight=dimensionar+relat%C3%B3rio
Sei que altera o tamanho do campo neste caso mas preserva a estética.
Sucesso!
.................................................................................
Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces
Clique AQUI e analise o custo beneficio do material oferecido.
wlac- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4
Registrado : 12/11/2010
Obrigado Criquio e Avelino Sampaio pelas excelentes dicas. Usei as duas contribuições..
» [Resolvido]Redimensionar texto para caber no campo
» [Resolvido]Como faço para atualizar uma caixa de texto em função de outra caixa de texto?
» [Resolvido]Texto invisível na última linha - caixa de texto em relatório ACCESS
» [Resolvido]preencher caixa de seleção texto com texto que eu escolher
» [Resolvido]Alterar localização do itens no formulário (caixa de texto, caixa de combinação)
» [Resolvido]Como faço para atualizar uma caixa de texto em função de outra caixa de texto?
» [Resolvido]Texto invisível na última linha - caixa de texto em relatório ACCESS
» [Resolvido]preencher caixa de seleção texto com texto que eu escolher
» [Resolvido]Alterar localização do itens no formulário (caixa de texto, caixa de combinação)