[fpc-pascal] Can't close and reopen ptcgraph

[James Richters]

>As a workaround, you can manually take care of the ptcwrapper object like this, in between closegraph and initgraph calls, but first ask yourself, do you really need this?

Thanks for figuring out what is going on.  I don't really need to close it and reopen it. I can work around by just hiding the window with 
ShowWindow(graphwindow,SW_hide);

To get back to my console window, then when needed I can clear it and show it again with.
ShowWindow(graphwindow,SW_show);

James