GD Access    GD Access    Grupo de Discussão  Ir para Categorias  Grupos técnicos  Ir para Fóruns  Access    Ajuste automático de formulário á resolução de tela
Go
Novo
Procurar
Notificar
Ferramentas
Responder
  
Ajuste automático de formulário á resolução de tela
 Login/Cadastrar
 
Iniciante

postado
O Microsoft Access fornece não criado no suporte para dimensionar o tamanho de um formulário para coincidir com a resolução da tela atual. Um formulário que você criar em um computador com uma resolução de driver de vídeo de 1024 x 768 (Super VGA) pode aparecer muito grande em computadores que executam em 640 x 480 (VGA) resolução. Um formulário que você criar usando a resolução de 640 x 480 pode parecer muito pequeno em computadores que executam a resolução de 1024 x 768.

encontrei um código onde pode obter duas funções Access Basic, glrScaleForm() e glrResizeForm(), que você pode usar para aumentar dinamicamente e dimensionar um formulário. A função glrScaleForm() pode ser chamada do evento Open do formulário para dimensionar o tamanho de um formulário para a resolução da tela atual quando o formulário é carregado. O glrResizeForm() pode ser chamado a partir o evento Resize do formulário para mover e dimensionar o conteúdo de um formulário proporcionalmente para ajustar as novas dimensões da janela do formulário automaticamente.
Mais não conseguir fazer as linhas de código funcionarem no meu sistema.
Segue o Link onde encontrei o artigo: http://support.microsoft.com/kb/138901/pt-br
 
Postagens: 9 | Registrado: 06 September 2010Reply With QuoteReport This Post
Coordenador

postado Hide Post
Poste aqui como ficou o código no seu sistema.
 
Postagens: 1913 | Registrado: 02 July 2001Reply With QuoteReport This Post
Diretor

postado Hide Post
ldmmarinho

Aqui no Forum, utilizando o procurar vc encontrará exemplo disso.

Adianto também que se vc tiver usando listview ou treeview, o redimensionamento não funciona, tera bastante distorção, primcipalmente quando um notebook de 11.. 9 .. 7 polegadas abrir sua aplicação.



****************************************************************************
Desenvolvendo sistemas em ACCESS desde 1995.

Está precisando implementar projetos em Access ?

Seu processo atual esta com várias planilhas Excel e precisa automatiza-las ?

MSN - nascimento_flavio@hotmail.com
Tel - (011) 99845-6262
****************************************************************************
 
Postagens: 4128 | Localização: Sao Paulo | Registrado: 14 September 2001Reply With QuoteReport This Post
Iniciante

postado Hide Post
Schoen, inserir o código de acordo como está abaixo.
glrScaleForm()
A função glrScaleForm() pode ser chamada do evento Open do formulário para dimensionar automaticamente o formulário para a resolução da tela atual.
Syntax:

Function glrScaleForm (frm As Form, intX As Integer, intY As Integer)

frm: form to be scaled
intX: horizontal resolution at which the form was designed
intY: vertical resolution at which the form was designed

Example:

Sub Form_Open (Cancel As Integer)
Dim RetVal
RetVal = glrScaleForm(Me, 1024, 768)
End Sub

glrResizeForm()
A função glrResizeForm() pode ser chamada do evento Resize do formulário para mover e redimensionar o conteúdo proporcionalmente para que se ajustem o novo tamanho da janela formulário automaticamente.
Syntax:

Function glrResizeForm (frm As Form, fDoResize As Variant)

frm: form to resized
fDoResize: boolean value indicating if the form should be resized or
the information tracked

Example:

Sub Form_Resize ()
Dim RetVal
RetVal = glrResizeForm(Me, True)
End Sub
 
Postagens: 9 | Registrado: 06 September 2010Reply With QuoteReport This Post
Coordenador

postado Hide Post
Mas isso é o que está no link da MS que voce indicou no post original. Gostaria de saber como ficou no SEU sistema. Copiar e colar não vai funcionar mesmo.
 
Postagens: 1913 | Registrado: 02 July 2001Reply With QuoteReport This Post
Analista Júnior

Figura de  José Mendes
postado Hide Post
quote:
lgmmarinho


Se leres com atenção o link que colocaste aqui, verás que precisas das funções "glrScaleForm() e glrResizeForm()" que no site está indicado como as podes obter.


__________________________________
Windows 7
Access 2007

José Mendes
(A desenvolver a própria ferramenta de gestão)
 
Postagens: 638 | Registrado: 18 November 2004Reply With QuoteReport This Post
Analista Júnior

postado Hide Post
Pegando a carona, isto serve para o Access 2000?
 
Postagens: 688 | Registrado: 30 August 2005Reply With QuoteReport This Post
Coordenador

postado Hide Post
ID do artigo: 138901 - Última revisão: sexta-feira, 5 de julho de 2002 - Revisão: 1.0

A informação contida neste artigo aplica-se a:

* Microsoft Access 2.0 Standard Edition

Não testei o código, mas não vejo por que não deva funcionar.
 
Postagens: 1913 | Registrado: 02 July 2001Reply With QuoteReport This Post
  Powered by Social Strata  
 

GD Access    GD Access    Grupo de Discussão  Ir para Categorias  Grupos técnicos  Ir para Fóruns  Access    Ajuste automático de formulário á resolução de tela

©