gtk / cairo anim simple

anim1.jl

using Gtk, Gtk.ShortNames, Graphics

win = Window("Test")
hbox = Box(:h)
setproperty!(hbox, :homogeneous, true)
push!(win, hbox)
for i = 1:4
  canv = Canvas()
  push!(hbox, canv)
  @schedule begin
    while true
      @guarded draw(canv) do widget
        ctx = getgc(canv)
        w, h = width(canv), height(canv)

        offsetW = w/32
        offsetH = h/32
        @inbounds for x = 1:32
          @inbounds for y = 1:32
            set_source_rgb(ctx, rand(), rand(), rand())
            rectangle(ctx, x*offsetW, y*offsetH, offsetW, offsetH)
            fill(ctx)
          end
        end
      end
      sleep(1/10)
    end
  end
end
showall(win)

cond = Condition()
signal_connect(win, :destroy) do widget
  notify(cond)
end
wait(cond)

anim2.jl

using Gtk, Gtk.ShortNames, Graphics
using Cairo

win = Window("Test")
hbox = Box(:h)
setproperty!(hbox, :homogeneous, true)
push!(win, hbox)
for i = 1:4
  canv = Canvas()
  push!(hbox, canv)
  @schedule begin
    while true
      @guarded draw(canv) do widget
        ctx = getgc(canv)
        w, h = width(canv), height(canv)

        m = rand(UInt32,32,32);
        Cairo.rectangle(ctx, 0,0 , w,h )
        Cairo.set_source_rgb(ctx,1,1,1)
        Cairo.fill(ctx)
        Cairo.rectangle(ctx, 0,0 , w,h )
        imgsurf = Cairo.CairoRGBSurface(m)
        imgpatt = Cairo.CairoPattern(imgsurf)
        Cairo.pattern_set_filter(imgpatt, Cairo.FILTER_NEAREST)
        imgmatrix = Cairo.CairoMatrix(33.0/w, 0, 0, 33.0/h, 0, 0)
        Cairo.set_source(ctx,imgpatt)
        Cairo.set_matrix(imgpatt, imgmatrix)
        Cairo.fill(ctx)
      end
      sleep(1/10)
    end
  end
end
showall(win)

cond = Condition()
signal_connect(win, :destroy) do widget
  notify(cond)
end
wait(cond)

adding two screenshots

screen of anim1.jl

screen of anim2.jl