private import    dfl.all;


int main()
{
  try
  {
      Application.run(new GraphTest);
  } 
  catch(Object o)
  {
      msgBox(o.toString(), "Fatal Error" , MsgBoxButtons.OK , MsgBoxIcon.ERROR);
      return 1;
  }
  return 1;
}

class GraphTest: Form
{

    
    this()
    {
        text = "MemoryGraphics";        
                
        Panel panGraphic = new MemDrawer(2000,2000);
        panGraphic.backColor = Color(0,0,0);
        
        panGraphic.dock( DockStyle.FILL );
        this.controls.add(panGraphic);
    }
}

class MemDrawer:Panel
{
    private MemoryGraphics memGraph;
    
    this(int w,int h)
    {        
        memGraph = new MemoryGraphics(w,h);
        
        ubyte r = 0 ;
        for (int i=0;i<w;i++)
        {
            r += 10;
            if (r>255) r=0;
            memGraph.drawLine(new Pen(Color(r,255,255)), i,0,i,h);
        }
    }
    
    protected override void onPaint(PaintEventArgs ea)
    {
        memGraph.copyTo(createGraphics,0,0,memGraph.width,memGraph.height);
    }
}