Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   JPEG Error #36 (https://www.clubdelphi.com/foros/showthread.php?t=33477)

ixMike 07-07-2006 19:24:32

JPEG Error #36
 
Hola,

veréis, en una parte de un programa que estoy haciendo hago un paso de BMP a JPEG. Esto ya lo había hecho otras veces, y nunca me había pasado nada, pero en este último intento... me sale el mensajito "JPEJ Error #36". He estado investigando por ahí, y resulta que ese mensaje se produce cuando no hay espacio en disco. VAle que la imagen que intenté pasar era de 2048x1536, pero tengo varios GBs de espacio libre.

¿Qué está pasando aquí? ¿Alguien puede ayudarme?

Gracias

seoane 07-07-2006 20:39:48

Puedes poner el codigo que utilizas, porque he intentado reproducir el fallo y no lo he conseguido, tarda un poquito pero completa la tarea sin errores.

He utilizado este codigo para intentar reproducir el fallo:
Código Delphi [-]
var
  Bitmap: Tbitmap;
  Jpeg: TJpegImage;
  i: integer;
begin
  Bitmap:= TBitmap.Create;
  Jpeg:= TJpegImage.Create;
  try
    // Creamos un bitmap MUY grande
    Bitmap.width:= 3000;
    Bitmap.Height:= 2000;
    Bitmap.Canvas.Pen.Width:= 10;
    // Dibujamos algo en el
    for i:= 1 to 1000 do
      Bitmap.Canvas.LineTo(Random(3000),Random(2000));
    // Hacemos la conversion.
    Jpeg.Assign(Bitmap);
    Jpeg.SaveToFile('c:\1.jpg');
  finally
    Bitmap.Free;
    Jpeg.Free;
  end;
end;

Tambien es cierto que delphi tiene ciertos problemas al tratar con imagenes muy grandes (ver este hilo como ejemplo), se queda sin espacio en memoria lo que no siempre esta relacionado con el espacio en disco


La franja horaria es GMT +2. Ahora son las 03:49:40.

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