DelphiTWAIN y Bitmap:S

[mrnovice]

Saludos foreros, Auxilio!!!!!, necesito una gran ayudaaaaa, muchota
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
  {An image has being acquired, add to list}
    ImageList.Add(TBitmap.Create);
    TBitmap(ImageList[ImageList.Count - 1]).Assign(Image);
    fOriginalSizeW:= Tbitmap(ImageList[0]).Width; {Valor del tamaño del Timage Width Normal}
     fOriginalSizeH:=Tbitmap(ImageList[0]).Height; {Valor del tamaño del Timage Height Normal}
      {In case it's the first image, display}
    if ImageList.Count = 1 then SelectFirst;
    GoForward.Enabled := ImageList.Count - 1 > CurrentImage;
  end else{ModoPreview}
  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!!!!!

[[Caral]]

Hola
Me alegro de que quitaras la parte de Urgente.
Yo lo tengo asi y funciona:

Código Delphi [-]
procedure TForm1.TwainTwainAcquire(Sender: TObject; const Index: Integer;
  Image: TBitmap; var Cancel: Boolean);
begin
  ImageHolder.Picture.Assign(Image);
  Cancel := TRUE;  {Only want one image}
end;

Saludos

[roman]

Empezado por Caral

Hola
Me alegro de que quitaras la parte de Urgente.

En realidad lo hice yo porque en el Club no existe esa palabra

Invitemos al amigo a releer la guía de estilo.

// Saludos

[mrnovice]

Saludos,disculpen por no seguir la guía de estilo, la presiòn y los nervios me tienen atado, no volvere a blasfemar asì lo prometo

[mrnovice]

ImageHolder es un Tlist,
Se adapta para varias imágenes?

[[Caral]]

Hola
Es un TImage.
Saludos