Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-04-2008
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Poder: 21
MaMu Va por buen camino
Cita:
Empezado por mrnovice Ver Mensaje
no tiene nada que ver pero tenias llena la bandeja de entrada de mensajes privados
-----
Saludos buen día, disculpe que lo meste, este me he fijado en el foro y parece que tiene experiencia en el manejo de este componente de JEDI DSL, has de cuenta estoy haciendo una aplicación pero el componente nosé si tenga una especia de bug, es decir cuando cargo dos imágenes de un directorio 'c:\x' no hay problema las imágenes son 2480 x 3507 formato jpg tamaño aproximado de 150 kb a 300 kb pero cuando pones muchas me aparece el error EOutOfResources 'Espacio de almacenamiento insuficiente para procesar este comando', no se si hays o escuchado de esta experiencia, alguna idea para solucionarlo, lo que pasa es que las imágenes que se procesan son de tamaño similar pero intente algo de las excepciones pero no me funcionó tal vez no lo implemente incluso con el except on EOutOfResources y pues no auxilio es de vital importancia para mi, o algún componente similar?
A mi me pasaba exactamente lo mismo, y evite esa excepción chequeando que la imágen sea un archivo válido y no este corrupto antes de cargarla en un jvThumb. Para hacer esto, busca las Vampire Image Library, que una vez me recomendo dec aqui en el foro, y desde entonces no he dejado de usarlas.

Saludos
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;
Responder Con Cita
  #2  
Antiguo 09-04-2008
Avatar de mrnovice
mrnovice mrnovice is offline
Miembro
 
Registrado: oct 2006
Posts: 163
Poder: 20
mrnovice Va por buen camino
JvThumbview

Cita:
Empezado por mamu Ver Mensaje
A mi me pasaba exactamente lo mismo, y evite esa excepción chequeando que la imágen sea un archivo válido y no este corrupto antes de cargarla en un jvThumb. Para hacer esto, busca las Vampire Image Library, que una vez me recomendo dec aqui en el foro, y desde entonces no he dejado de usarlas.

Saludos
Saludos, gracias por la pronta respuesta en serio gracias es bueno saber que no soy el único con este problema, me sentía algo frustrado, El VCL de Vampyre Imaging Library afortunadamente lo tengo voy a buscar esa función luego te digo cómo me fue, saludos, <no se si parte del problema te aparecio 'Floating point division by zero'? supongo que va de la mano con EOutOfResources, saludos buen día. >Ya estoy viendo el post que hiciste acerca el de point divion by zero, lo estoy checando, hay disculpa
Espero hacer funcionar esto jejeje aunque sea a golpes al monitor jajaj a veces pasa XD

Última edición por mrnovice fecha: 09-04-2008 a las 21:55:44.
Responder Con Cita
  #3  
Antiguo 10-04-2008
Avatar de mrnovice
mrnovice mrnovice is offline
Miembro
 
Registrado: oct 2006
Posts: 163
Poder: 20
mrnovice Va por buen camino
Talking hola, disculpa

Cita:
Empezado por mamu Ver Mensaje
A mi me pasaba exactamente lo mismo, y evite esa excepción chequeando que la imágen sea un archivo válido y no este corrupto antes de cargarla en un jvThumb. Para hacer esto, busca las Vampire Image Library, que una vez me recomendo dec aqui en el foro, y desde entonces no he dejado de usarlas.

Saludos
ya estuve analizando Vampyre Imagin Library pero , cual fue la funciòn que usaste, fue acaso testImage?, ahhhh! ya quiero resolverlos saludos y gracias nuevamente

Última edición por mrnovice fecha: 14-04-2008 a las 17:06:03. Razón: El TImage32 es para una libreria Graphics32 una sincera disculpa
Responder Con Cita
  #4  
Antiguo 10-04-2008
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Poder: 21
MaMu Va por buen camino
Cita:
Empezado por mrnovice Ver Mensaje
ya estuve analizando Vampyre Imagin Library pero vi que es un Timage32 y un Timage, no habra problemas de compatibilidad, cual fue la funciòn que usaste, fue acaso testImage?, ahhhh! ya quiero resolverlos saludos y gracias nuevamente
Exactamente, la funcion es TestImage, pero ojo, cada vez que compares, tenes que liberar uno a uno (free) la componente imagen que uses, sino, el error se arrastra. En la documentación no encontré nada sobre esto, de hecho, cuando solo comparaba una imagen para ver si era válida, el free daba lo mismo, pero no pasa cuando son muchas. De todas maneras es el componente más rapido que probé.

Busca "Jpg/BMP a máxima velocidad", y fijate en el post que una vez inicie que hay info muy buena, e incluso arme una parodia de cronometrar el tiempo de ejecucion (en tiempo real) para divertir a los amigos foristas. Ahi mismo hablamos sobre las V.I.L.

Un saludo.
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;
Responder Con Cita
  #5  
Antiguo 11-04-2008
Avatar de mrnovice
mrnovice mrnovice is offline
Miembro
 
Registrado: oct 2006
Posts: 163
Poder: 20
mrnovice Va por buen camino
Angry Saludos

Cita:
Empezado por mamu Ver Mensaje
Exactamente, la funcion es TestImage, pero ojo, cada vez que compares, tenes que liberar uno a uno (free) la componente imagen que uses, sino, el error se arrastra. En la documentación no encontré nada sobre esto, de hecho, cuando solo comparaba una imagen para ver si era válida, el free daba lo mismo, pero no pasa cuando son muchas. De todas maneras es el componente más rapido que probé.

Busca "Jpg/BMP a máxima velocidad", y fijate en el post que una vez inicie que hay info muy buena, e incluso arme una parodia de cronometrar el tiempo de ejecucion (en tiempo real) para divertir a los amigos foristas. Ahi mismo hablamos sobre las V.I.L.

Un saludo.
Te agradezco mucho la atención lo leí muy rapido y probe el código de las resoluciones y si funciona lo que no me funcionó es la idea se puede saber que he estado haciendo mal?
please
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 Imaging.TestImage(Img) then
        begin
          //es verdero
          jvthumbview1.AddFromFile(OpenPictureDialog1.FileName);
          Imaging.FreeImage(Img);
        end;
    End;
end;
estuve agregando de manera manual las imágenes pero a la 5 me truena con esa excepción que ya me trae de cabeza omg!!!! jeje no queria poner la carita pero esa excepción ya!!!!, voy a seguir intentando pero estoy seguro de que me falta algo.... gracias
Saludos.
Responder Con Cita
  #6  
Antiguo 11-04-2008
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Poder: 21
MaMu Va por buen camino
El problema es que no estas controlando la excepción, para evitar esto, primero tenés que analizar si la imagen es válida y de ser así cargarla, ya que si lo haces al revéz, la excepción genera un error por estar cargando de antemano un imagen corrupta. Probé el código y si libero cuando una imagen esta corrupta (renombre un exe a jpg y probé!!! ) ya no tengo la excepción. La idea, es que, cuando una imagen sea corrupta, cargues otra que diga error en JvThumb, queda muy bien y das un aviso de que archivo está mal.


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 Imaging.TestImage(Img)   
        then begin //Si es válida la cargo          
         jvthumbview1.AddFromFile(OpenPictureDialog1.FileName);  
     end          
     else begin    
        Imaging.FreeImage(Img); //esta corrupto, libero    
        jvthumbview1.AddFromFile('C:\imageError.bmp');  
     end; 
  End;
end
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;

Última edición por MaMu fecha: 11-04-2008 a las 20:42:00.
Responder Con Cita
  #7  
Antiguo 11-04-2008
Avatar de mrnovice
mrnovice mrnovice is offline
Miembro
 
Registrado: oct 2006
Posts: 163
Poder: 20
mrnovice Va por buen camino
Agradecimiento,pero:(

Cita:
Empezado por mamu Ver Mensaje
El problema es que no estas controlando la excepción, para evitar esto, primero tenés que analizar si la imagen es válida y de ser así cargarla, ya que si lo haces al revéz, la excepción genera un error por estar cargando de antemano un imagen corrupta. Probé el código y si libero cuando una imagen esta corrupta (renombre un exe a jpg y probé!!! ) ya no tengo la excepción. La idea, es que, cuando una imagen sea corrupta, cargues otra que diga error en JvThumb, queda muy bien y das un aviso de que archivo está mal.


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 Imaging.TestImage(Img)
then begin //Si es válida la cargo
jvthumbview1.AddFromFile(OpenPictureDialog1.FileName);
end
else begin
Imaging.FreeImage(Img); //esta corrupto, libero
jvthumbview1.AddFromFile('C:\imageError.bmp');
end;
End;
end
Gracias nuevamente, rayos y recontrarrayos me sigue pasando a la 5ta imagen me sale la excepción, puse el código que me pusiste no será que falta el With EoUtOfresources do begin ...end;? a eso te referias, podria pasrte la imagen, voy a seguir investigando :::..ando corto de tiempo saludos y muchas gracias, compensare toda la ayuda en cuanto pueda gracias
Responder Con Cita
  #8  
Antiguo 11-04-2008
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Poder: 21
MaMu Va por buen camino
Cita:
Empezado por mrnovice Ver Mensaje
Gracias nuevamente, rayos y recontrarrayos me sigue pasando a la 5ta imagen me sale la excepción, puse el código que me pusiste no será que falta el With EoUtOfresources do begin ...end;? a eso te referias, podria pasrte la imagen, voy a seguir investigando :::..ando corto de tiempo saludos y muchas gracias, compensare toda la ayuda en cuanto pueda gracias
Y si, en que partes contemplas el tratamiento de un archivo corrupto?
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Diseño e implementación de Thumbnails MaMu Gráficos 4 18-04-2007 20:25:37
Componente para gráficos Besto Gráficos 1 11-10-2006 20:53:23
Componente para Filtrar ADO, Para D5 olbeup OOP 5 14-09-2005 17:40:01
componente para norma19 para delphi7 raulmm26 Varios 3 07-02-2005 12:31:11
Como puedo ver imagenes en Thumbnails? marcoev Gráficos 1 29-05-2003 21:06:36


La franja horaria es GMT +2. Ahora son las 02:23:46.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi