Redimensionar Imagens no Delphi

[jonikaites 0]

graaaande amigos do iMasters!venho eu mais uma vez sublimente pedir ajuda a vcs ehehehehecomo q eu faço para redimensionar uma imagem no delphi???tipow:com o OpenPictureDialog, eu coloquei a imagem num TImage, com a funcao stretch ativada.o qq eu kero eh converte a imagem por exemplo de 640x480 px em 220x150px (isso fika uma reducao proporcional).q codigo eu uso pra q assim q for clicado em carregar a img, ele já diminua o tamanho dela automaticamente??taum eh isso.... flwzzzz

[arcanjo_junior 0]

Simples, é so você utilizar uma regra de 3 para as proporções.....Por exemplo. Tenho uma imagem 100x150 e quero diminui-la 15% , então : with_original := 100; height_original := 150; perc_diminuir := 15; with_final := (width_original * (perc_diminuir/100)); height_final := (height_original * (perc_diminuir/100));Pronto é isso ....Espero ter ajudado....Sebastião Júnior

[jonikaites 0]

consegui faze uma bagacinha +-

 

http://www.imasters.com.br/forum/index.php...opic=139459&hl=