Abrir Imagem

Question

Ol�!Tenho uma d�vida idiota, por�m que n�o estou conseguindo achar solu��o. A d�vida �  a seguinte: Como fa�o para abrir imagens, tipo coloco um bot�o uma caixa de texto um OpenPicture e um Image, ao ...

Henry · Answer

Brother, tente assim.

No evento Onclick:

if opendialog1.execute then
begin
image1.Picture.LoadFromFile(opendialog1.filename);
edit1.text:= opendialog1.FileName;
end;
end;

Espero ter ajudado, um abra�o, Henry.

Celo-faveri · Answer

valew henry, pela resposta...n�o sei como n�o pude pensar em colocar um ponto depois de Picture...valew...mas surgiu-me outra d�vida, se pudesse me ajudar ficaria satisfeito: Beleza abri a imagem s� que se eu a coloco com Auto Size ocupa mto lugar no programa, por tanto, gostaria que o programa �reduzisse� a imagem, como no Internet Explorer...

Abra�o
T+ :wink:

Henry · Answer

Brother, assim, a imagem vai fica do tamanho que vc botar o componente no Form:

if opendialog1.execute then
begin
image1.picture.LoadFromFile(opendialog1.filename);
image1.Stretch:= true;
end;
end;

Qualquer coisa, � so fala Brother.
Um abra�o, Henry.

F�rum Abrir Imagem #189521