Actually as I recall, DelphiX requires you to Release your surface after using the canvas to continue drawing to it. If you don't release it it will not draw anything else beyond what you whee just previously doing with the canvas. his includes TextOut();.

There should only every be 1 Flip();