MyPrinter = THISFORM.Lead1.PrintStart THISFORM.Lead1.Render(MyPrinter, 0, 0, ControlWidth, ControlHeight) THISFORM.Lead1.PrintEnd(MyPrinter)