Need routine for printing the screen in graphics mode

Does anybody have a procedure/unit that let's you print the
current graphic screen ? (except for the Shift+PrnScrn).
I have an Canon BJC 4000 printer.
If anybody can help, please mail to chrpe...@login.eunet.no

Thank's in advance :-)

Christian