Delphi: La Carga de Imágenes JPEG en TImage no funciona: Exception EInvalidGraphic: Unknown picture file extension (.jpg)
Pregunta de Chematik | 10/05/2021 a las 18:45
Me gustaría cargar dinámicamente una imagen JPG en uno de mis programas Delphi para que pueda mostrarse en mi programa. Para hacer esto, arrastré un componente TImage de Delphi al formulario y usé el siguiente código:
Image1.Picture.LoadFromFile('imagen.jpg');
Desafortunadamente, esto no funciona y, en su lugar, aparece un error con el siguiente mensaje de error:
Project Project1.exe raised exception class EInvalidGraphic with message 'Unknown picture file extension (.jpg)
En otras palabras, Delphi parece no entender los gráficos JPG. Pero pienso: Si no JPEG, ¿entonces qué? ¿Cómo puedo corregir el error?
Temas Relacionados
Delphi: Cargar Imagen JPEG en TBitmap
Tutorial | 0 Comentarios
jQuery: Contar Elementos, Imágenes, Clases, etc.
Consejo | 0 Comentarios
Agregar Ceros iniciales a Números existentes en Nombres de Archivo
Pregunta | 1 Respuesta
HTML: Ocultar Toolbar para guardar imágenes en Internet Explorer
Consejo | 0 Comentarios
HTML5: Canvas.toDataURL() siempre devuelve PNG en lugar de JPG
Pregunta | 1 Respuesta
PHP: GZip comprimir archivos con PHP
Consejo | 1 Comentario
jQuery: ¿Hay un Elemento?
Consejo | 1 Comentario
Aviso Importante
Por favor tenga en cuenta: Las contribuciones publicadas en askingbox.com son contribuciones de los usuarios y no deben reemplazar el asesoramiento profesional. No son verificados por independientes y no reflejan necesariamente la opinión de askingbox.com. Aprende más.
Participar
Haga su propia pregunta o escriba su propio artículo en askingbox.com. He aquí cómo.
Simplemente agregue "Jpeg" a la lista de USES en la parte superior de su código.
Tiene que hacer eso, porque de lo contrario, Delphi no puede entender el formato JPG. Con esta corrección, debería funcionar.
Después de eso, arriba debería verse similar a eso:
Y puede cargar imágenes JPG en su TImage.
01/05/2021 a las 22:18
Gracias por su respuesta, esto funciona en mi código.
Espero que también funcione para otras personas.
03/05/2021 a las 16:21
Quizás pueda intentar agregar el espacio de nombres completo de Vcl. Imaging a su proyecto.
Vaya al menú: Project > Options > Delphi Compiler > Unit Scope Names.
03/05/2021 a las 20:26