[Deiv]

Finalmente, para el poco conocimiento que tengo logre lo que quería, tuve que darle muchas vueltas al código y finalmente comprendí que el orden de las líneas estaban mal. Este funciona:

Código Delphi [-]
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  PaintBox1.Left:=PaintBox1.Left+2;
  PaintBox1.Repaint;
  PaintBox2.Left:=PaintBox2.Left-2;
  PaintBox2.Repaint;
  
  ImageList1.Draw(PaintBox1.Canvas,0,0,0);
  ImageList1.Draw(PaintBox2.Canvas,0,0,1);
end;

Ahora estoy enredado en otro, estoy intentando blinkar habiendo creado el doble de alto como sugirió madriles, pero el ejemplo de arriba está dado para un TImage con la propiedad Top, y yo estoy trabajando con una TImageList como mencioné en mi último post y este no tiene la propiedad Top????

Código Delphi [-]
var
  Bitmap: TBitmap;
implementation
procedure TForm1.FormCreate(Sender: TObject);
begin
  Bitmap:= TBitmap.Create;
  try
    BitMap.LoadFromFile(getcurrentdir+'/BigBmp.bmp');
    ImageList1.Width:= BitMap.Width div 10; // 10 Elementos
    ImageList1.Height:= BitMap.Height div 2;  //Muestro solo la parte superior del BitMap de doble alto
    ImageList1.BkColor:=clNone;
    ImageList1.BlendColor:= clNone;
    ImageList1.DrawingStyle:= dsTransparent;
    ImageList1.Masked:= True;
    ImageList1.AddMasked(Bitmap, Bitmap.Canvas.Pixels[0,0]);
  finally
    BitMap.Free;
  end;
end;

¿Como podría blinkar esa sección del TImageList?