He intentado corregirlo, he preguntado en los foros y me recomendaron un tercer componente que me ayude a validar la imagen, además ya queda claro que hay una limitante por parte de Delphi y tal vez el component para cantidades de imágenes grandes y en cantidad, el problema lo simplifique
simplemente lo quiero agregar una por una al jvthumbview pero al agregar a la 5 me truena alguna sugerencia?
Gracias saludos y buen día
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
img:TImageData;
begin
If OpenPictureDialog1.Execute then
Begin
Imaging.InitImage(Img);
Imaging.LoadImageFromFile(OpenPictureDialog1.FileName,img);
if TestImage(Img) then
begin
jvthumbview1.AddFromFile(OpenPictureDialog1.FileName);
FreeImage(Img);
end;
End;
end;