Centralizar imagem no formulário
Olá para todos!
Tenho uma imagem localizada no dentro de um formulário maximizado. Até
aí tudo bem, mas caso este formulário seja executado em um computador
onde a tela tenha uma resolução diferente a tela onde eu efetuei os testes, a
imagem não permanecerar mais no centro do formulário.
Acredito que o delphi tenha algum recurso para resolver este problema,
aguém tem alguma dica :?:
Desde já obrigado!
Tenho uma imagem localizada no dentro de um formulário maximizado. Até
aí tudo bem, mas caso este formulário seja executado em um computador
onde a tela tenha uma resolução diferente a tela onde eu efetuei os testes, a
imagem não permanecerar mais no centro do formulário.
Acredito que o delphi tenha algum recurso para resolver este problema,
aguém tem alguma dica :?:
Desde já obrigado!
Fabricio.ribeiro
Curtidas 0
Melhor post
Willian
30/06/2009
Tenta:
Avisa se deu certo...
imagem.left := trunc((formulario.width - imagem.width) / 2);
imagem.top := trunc((formulario.height - imagem.height) / 2);
Avisa se deu certo...
GOSTEI 1
Mais Respostas
Willian
30/06/2009
Não conheço [i:0b81dfe974]nada automático[/i:0b81dfe974], mas acho que esse código resolve seu problema:
Pode colocar esse código no [b:0b81dfe974]OnCreate [/b:0b81dfe974]e no [b:0b81dfe974]OnResize [/b:0b81dfe974]do form.
Espero ter ajudado!
Abraços,
Willian
imagem.left := (formulario.width - imagem.width) / 2 imagem.top := (formulario.height - imagem.height) / 2
Pode colocar esse código no [b:0b81dfe974]OnCreate [/b:0b81dfe974]e no [b:0b81dfe974]OnResize [/b:0b81dfe974]do form.
Espero ter ajudado!
Abraços,
Willian
GOSTEI 0
Osocram
30/06/2009
vc pode usar as propriedade anchor do objeto imagem.
GOSTEI 0
Fabricio.ribeiro
30/06/2009
Obrigado a todo pelas respostas!
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:0e327bf03f]Incompatible types: ´Integer´ and ´Extend´[/i:0e327bf03f]
Qual seria o motivo?
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:0e327bf03f]Incompatible types: ´Integer´ and ´Extend´[/i:0e327bf03f]
Qual seria o motivo?
GOSTEI 0
Fabricio.ribeiro
30/06/2009
Obrigado a todo pelas respostas!
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:29e204adf0]Incompatible types: ´Integer´ and ´Extend´[/i:29e204adf0]
Qual seria o motivo?
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:29e204adf0]Incompatible types: ´Integer´ and ´Extend´[/i:29e204adf0]
Qual seria o motivo?
GOSTEI 0
Fabricio.ribeiro
30/06/2009
Obrigado a todo pelas respostas!
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:438ba2ed8b]Incompatible types: ´Integer´ and ´Extend´[/i:438ba2ed8b]
Qual seria o motivo?
Willian tentei a sua sugestão, ustilizando as três operações (+ , - e x)
ocorre tudo bem, porém quando uso a quarto ( / ) que está em sua sugestão ,
o delphi lança um erro de copilação:
[i:438ba2ed8b]Incompatible types: ´Integer´ and ´Extend´[/i:438ba2ed8b]
Qual seria o motivo?
GOSTEI 0
Fabricio.ribeiro
30/06/2009
Funcionou perfeitamente... e ainda aprendi a função do precedimento Truc.
Obrigado Willian! :D
Obrigado Willian! :D
GOSTEI 0
Cgm2k7 2013
30/06/2009
Vlw Amigo me ajudou tambem
GOSTEI 0
Pedro Souza
30/06/2009
Tenta:
Avisa se deu certo...
imagem.left := trunc((formulario.width - imagem.width) / 2);
imagem.top := trunc((formulario.height - imagem.height) / 2);
Avisa se deu certo...
GOSTEI 0
Pedro Souza
30/06/2009
Ótimo... aproveitei a dica!
GOSTEI 0