Fórum JPEG em Timage #364229
24/09/2008
0
Image1.picture.loadfromfile(´c:\imagem.jpeg´)
Se for .bmp não dá o erro. Mas aê eu teria que converter toas as imagens do meu arquivo.
Valeu por qualquer ajuda.
Abelha
Curtir tópico
+ 0Posts
24/09/2008
Adriano Santos
Image1.picture.loadfromfile(´c:\imagem.jpeg´)
Qual erro?
Basicamente você precisa declarar a Unit JPEG no Uses do seu formulário, assim:
... interface uses JPEG; ... procedure TForm1.Button1Click(Sender: TObject); begin with OpenPictureDialog1 do if Execute then Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName); end;
Gostei + 0
24/09/2008
Abelha
Gostei + 0
24/09/2008
Abelha
Gostei + 0
04/10/2008
Abelha
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)