WinVista VS Win7 - Mesma resolu��o, layout diferente

Question

Prezados,Estou com um problema e j� procurei uma solu��o em v�rios sites e f�runs, mas nenhuma das solu��es apresentadas resolveu meu problema. Vou detalhar o ambiente e o problema, para entender e ...

Bruno Leandro · Answer

Ola Tadeu por incrivel que pare�a eu tenho o note1 igual ao seu e o note2 semelhante o meu � o i7 nos depois hardware s�o iguais, e estou com esse mesmo problema ainda n�o identifiquei o que esta acontecendo, caso voce identificou poderia compartilhar com a comunidade o ocorrido. obrigado....

Bruno Leandro · Answer

Ola Tadeu consigui resolver aqui, se voce observar na propriedade PixelsPerInch do form em um ta 96 e no outro 120, por isso a bagun�a para n�o alterar eu fiz assim, na propriedade printscale = a poNone e na propriedade Scaled = a false

Bruno Leandro · Answer

Ola Tadeu consigui resolver aqui, se voce observar na propriedade PixelsPerInch do form em um ta 96 e no outro 120, por isso a bagun�a para n�o alterar eu fiz assim, na propriedade printscale = a poNone e na propriedade Scaled = a false

Cicero Fran�a. · Answer

Ol� Bruno,Cara, passei uma semana acamado, por isto n�o respondi antes, mas vamos l�. J� havia notado a mudan�a da propriedade PixelsPerInch, mas n�o tinha mudado as propriedades PrintScale e Scaled como voc� informou. Testei aqui, mas continuou dando erro, mas valeu a dica. Estou tentando ver outras possibilidades, se conseguir resolver postarei a resposta aqui.Caso algu�m tenha passado pelo mesmo problema e tenha resolvido, por favor, postem aqui a solu��o. Desta maneira a comunidade Delphi agradece e fica mais forte....

Cicero Fran�a. · Answer

Ol� Delphianos,Tenho uma triste noticia para voc�s sobre o problema que resultou neste post.As resolu��es do Delphi � baseada no tamanho do texto configurado no Windows, por este motivo estava tendo o problema. Existem duas maneira de resolver o problema que irei apresentar abaixo:&gt&gt&gt Resolu��o 1 &lt&lt&ltEntre em Painel de Controle numa das sub-op��es de V�deo tem Ampliar ou reduzir texto e outros itens. No meu caso o tamanho da fonte estava M�dio - 125%, mudei para Menor - 100% e reiniciei o notebook. Ao liga-lo como por milagre o layout voltou ao normal.  &gt&gt Vantagem: Voc� n�o muda nada no projeto.  &gt&gt Desvantagem: Voc� tem que mudar as configura��es do cliente caso isto aconte�a na m�quina dele.&gt&gt&gt Resolu��o 2 &lt&lt&ltColoque a fun��o abaixo num local que seja compartilhado por todas as units:    function Dimensionar(const X: Integer): Integer;    begin      Result := MulDiv(X, Screen.PixelsPerInch, 96);    end;Sempre que houver uma mudan�a em run-time das propriedades TOP, LEFT, HEIGHT ou WIDTH, utilize a fun��o acima como mostrado no exemplo:  Substituir: Button1.Top := 20;Por: Button1.Top := Dimensionar(20);  &gt&gt Vantagem: Voc� n�o muda as configura��es do cliente.  &gt&gt Desvantagem: Voc� tem que mudar e testar todo o aplicativo em configura��es diferentes.Se algu�m tiver outra solu��o, por favor compartilhem conosco.Espero ter ajuda a quem tenha passado por este mesmo problema. Se voc� � um deles, deixe sua opini�o....

F�rum WinVista VS Win7 - Mesma resolu��o, layout diferente #419728