Saludos foreros, Auxilio!!!!!, necesito una gran ayudaaaaa, muchota
![Frown](http://www.clubdelphi.com/foros/images/smilies/frown.gif)
Miren he utilizado he tratado de aprender el uso de este componente llamado DelphiTWAIN, lo he entendido, pero no en su totalidad, este es el enlace
:
http://delphitwain.sourceforge.net/
Me base en el programa Full features,hay una parte donde entiendo de aqui se anexa la imagen a memoria.
Código Delphi
[-]
procedure TFdetalle.TwainTwainAcquire(Sender: TObject; const Index: Integer; Image: TBitmap; var Cancel: Boolean);
var MyJPG:TJPEGImage;
begin
if modoPreview=FALSE then begin
ImageList.Add(TBitmap.Create);
TBitmap(ImageList[ImageList.Count - 1]).Assign(Image);
fOriginalSizeW:= Tbitmap(ImageList[0]).Width;
fOriginalSizeH:=Tbitmap(ImageList[0]).Height;
if ImageList.Count = 1 then SelectFirst;
GoForward.Enabled := ImageList.Count - 1 > CurrentImage;
end else
begin
ImageList.Add(TBitmap.Create);
TBitmap(ImageList[ImageList.Count - 1]).Assign(Image);
SelectPreview;
end;
end;
El mayor problema de todos es cuando escaneo una imagen, se llena la memoria hasta el tope como 50mb por imagen, común
ImageList : TList tengo entendido manda un puntero un objeto, osea en este caso entiendo que es un Bitmap muy grandodododote, es posible reducir el costo de memoria del ImageList a mi se me ocurrio tratar de ponerlo en Formato JPEG, JPG, no sè si sea buena idea, cualquier sugerencia serìa muy apreciada no se què hacer , estoy al borde de la desesperaciòn XD, saludos , si necesitan más explicaciòn no duden en comentarme, pero porfas!!!!!