Código Delphi [-] ... begin MakeSquares(Image1.Canvas, Point( 10, 10 ), 7, 30 ); Image1.Canvas.TextOut(12,12, 'Hola'); end;
... begin MakeSquares(Image1.Canvas, Point( 10, 10 ), 7, 30 ); Image1.Canvas.TextOut(12,12, 'Hola'); end;