[Resolvido]Janela Pop Up Ajustavel

Caros amigos uma questao sobre redimensionamento de forms

para uma janela com as propriedades

PopUp
borda Ajustável

Tem algum codigo ou ação que ao redimensionar o form horizontalmente a parte inferior da borda acompanhe esse redimensionamento...

Obs.. o meu form ja tem o código de redimensionamento.. isto esta Ok, o que preciso e apenas que a borda acompanhe esse redimensionamento...

Segue o print para que vejam

Grato

https://www.dropbox.com/s/3zwd6dg0d47pnng/Sem%20t%C3%ADtulo.jpg

Veja;

http://maximoaccess.forumeiros.com/t346-resolvidoajustar-formulario-via-vba

Utilize o:

Public Sub Form_Load()
Me.Form.InsideHeight = Me.SeuUltimoBotão.Height + 50
End Sub

Caro JP esse comando esta limitando o form.. dependendo do valor ele limita a borda..
eu estou usando o |SS resize para o redimensionamento...

olha so..
eu estou usando o modulo SSresize...

entao quando eu clico na borda lateral para redimensionar o form horizontalmente..
a borda inferior nao acompanha...

eu coloquei o codigo conforme me orientou.. mas ele abre totalmente retraido verticalmente

Uma opção seria capturar a largura e altura original no evento "Ao carregar" e no evento "Ao redimensionar" seria feito um cálculo em porcentagem para ajustar largura e altura na mesma proporção.

opa.. otima ideia..
rsrs
mas como faze isso? rsrs

Tens que estar a utilizar não 1 mas 2 módulos. Experimenta o que o Mestre te diz sem o código no form, quer no evento Load, quer no evento Resize. Quanto a mim o form aestá desproporcionado no acto da criação. O ideal é fazer em 800/600, por enquanto. Também é bom o Mestre saber que se trata de um Wide Screen

Exatamente isso, porque quando eu o abrir em um monitor diferente.. a area lateral se adequara ao monitor..
mas a inferior permanecer.. como esta ai no print

Até porque a utilização desses módulos e dos respectivos códigos já safaram alguns colegas. Agora, mo meu pc eu uso 1024/786 e recebo aqui pedido de ajudas co BD's cujos forms necessitam de uma parede de 3 metros para visualiza-los

apliquei o codigo do jp sem o SS resize.. e ele minimizou o form verticalmente, nao deixando ele ajustavel, como se fosse no estilo Dialogo (sem ajuste)

vierao.. o meu caso e mais simple que pensamos...

o codigo do resize esta funcionando perfeitamente...
apenas a borda inferior do form que nao acompanha o redimensionamento...
como ai no print que te enviei...

creio que a solucao do amigo criqui serviria..
mas nao sei como faze-lo

Então você quer alterar apenas a largura do formulário, é isso? Mas e se der diferença na altura de forma que afete a visualização? Outra coisa é que nesse caso, ao se tratar de uma diferença entre wide screen e normal, já não se torna uma boa ideia aumentar largura e altura na mesma proporção.

Para mim é o form que está desproporcionado, ou então no wide screen o código não funciona correctamente. É muito fácil veres isso.

1- Cria um form em branco com 800/600

2- Insere o código no evento load e rezize e experimenta para ver o que acontece.

Olha so amigos..

o Form esta auto ajustavel...
quando eu abrir em um outro monitor.. qualquer seja o tamanho.. ele se adequa a tela... horizontalmente e verticalmente...

O form (interior dele)todos os objetos estao redimensionando beleza...

Apenas a borda inferior que nao acompanha a diminuicaco do tamnho horizontal...
Preazado criqui.. Abra o print no link la acima e veja...
o form foi redimensionado automaticamente ao abrir em um monitor menor
apenas a borda inferior nao acompanhou

O form está desajustado. Viste o poste acima, com a sugestão que dei? É assim que se tratam os problemas. Fui.

Pelo que entendi, isso acontece por causa da desproporção entre largura e altura em monitores wide screen e monitores normais. Ajustar isso vai implicar em aumentar a altura dos elementos de forma desproporcional. Talvez cause um aspecto menos apresentável do que deixar como está.

aiaiai voces nao estao entendendo...

estou falando da borda..

Vamos supor que a borta original Horizontal tenha 10 cm...
e que a largura vertical 5 cm..


se eu alterar a horizontal pra 5...
a vertical vai pra 2,5... proporcional

apenas isso..
porque o form e seus elementos ja estao escalonando...

A sua ideia amigo criqui foi a que me pareceu mais viavel para o meu caso...

do ajuste proporcional, capturar a largura x altura e colocar no codigo..
poderia me ajudar com isso?

Vejo que tem uma caixa que envolve o menu inferior aonde está o botão "Histórico todos". Vamos tentar o seguinte:

Me.InsideHeight = Me.NomeDaCaixa.Top + Me.NomeDaCaixa.Height + 50

Ajuste o 50 para mais ou menos até chegar aonde lhe satisfaça.

Amigao.. essa ai foi uma dica do JP
mas nao funcionou..
da uma olhada no print e vais entender.. Aguardo

https://www.dropbox.com/s/3zwd6dg0d47pnng/Sem%20t%C3%ADtulo.jpg

a solucao creio que e por aqui:

Uma opção seria capturar a largura e altura original no evento "Ao carregar" e no evento "Ao redimensionar" seria feito um cálculo em porcentagem para ajustar largura e altura na mesma proporção

Pelo que entendi, ainda acredito que a dica anterior atende melhor, pois você quer apenas ajustar a altura de modo a não ficar sobrando formulário após a caixa47, ou não é isso? Se for isso mesmo, eu fiz um teste aqui colocando no final do código do evento "Ao abrir" do formulário:

Me.InsideHeight = Me.Caixa47.Top + Me.Caixa47.Height + 1700

A altura ficou ajustada certinho.

ocorre amigao que essa versão ai nao esta com o ssResize...

o form esta certo.. mas para funcionar com o SSResize precisei deixar a borda ajustavel...
entao se abro ele em um monitor menor.. ele se ajusta horizontalmente... deixando essa falha embaixo do form...

Sim, mas essa linha logo após a chamada do módulo do Resize não ajusta a altura? Eu não tenho esse módulo para poder testar aqui, mas imagino que deve ajustar se ela for colocada depois da chamada desse módulo.

opa.. deu certo amigao..
o tamanho 1700 e o tamanho do form nao?
posso diminuir ele um pouco certo?

É isso ai amigao..
o conjunto dde ferramentas +Codigos usados na proporcao e maneira correta nos da o resultado que queremos..
apenas alterei o valor para 1750, para nao diminuir o form na hora da abertura

Obrigado
Saudações

Valeu amigo. A lógica nesse caso foi a seguinte: você tem a caixa47, certo? Essa caixa tem a sua posição vertical representada pela propriedade Top, ou seja, aonde ela está à partir do topo. Essa caixa tem tambem a sua altura, representada pela propriedade Height. Como queremos que a altura do form vá até passar o tamanho total dessa caixa, obtemos a posição inicial dela + a altura dela. E então adicionamos o 1750 que é a posição depois que terminar o tamanho da caixa.

Informação dada.. Informação assimilada...

Obrigado..

Agora vou ao e-mail/pdf do nosso outro topico
ate mais