网上找到以下一段代码，可以打印pdf文件，但怎么关闭这个文件呢，请各位帮忙。谢谢！

Thisform.Newobject('pdf', 'Olecontrol', '', '', 'AcroPDF.PDF.1')
Thisform.pdf.Move( 10, 10, Thisform.Width - 20, Thisform.Height - 20)
Thisform.pdf.SetShowToolbar(.f.)
Thisform.pdf.LoadFile( Getfile('pdf') )
Try     
Thisform.pdf.Visible = .T.
Catch
Endtry
Thisform.pdf.SetFocus()

1.查看ThisForm.pdf的方法清单，看有没有Close之类的方法，如有，做第2点
2.先调用Close，用对象的方法确保关闭占用的资源，这是最重要的，然后调用ThisForm.pdf.Release方法把pdf对象从内存中清除

以下代码可以打开，打印，关闭pdf文件，但不知道INKEY有什么用，高手请帮忙指点一下。谢谢


#define WM_CLOSE  0x0010


    lpszfile='142681-6-1 GM.pdf'

    IF FILE(lpszfile)
        DECLARE INTEGER ShellExecute IN Shell32.DLL INTEGER HWND,STRING,STRING lpszFile,STRING,STRING,INTEGER
        DECLARE Long FindWindow IN WIN32API ;
        String lpClassName, String lpWindowName
        DECLARE Long PostMessage IN WIN32API ;
        Long hWnd, Long Msg, Long wParam, Long lParam
        =ShellExecute(0,'Open',lpszfile,'','',1)
        INKEY(5)
        =ShellExecute(0,'print',lpszfile,'','',1)
        INKEY(10)
        m.hWnd = FindWindow(null, JUSTFNAME(lpszfile) +' - Adobe Reader')
        IF (m.hWnd == 0)
               MessageBox('没有找到打开 pdf 文件的窗口。')
        ELSE
            PostMessage(m.hWnd, WM_CLOSE, 0, 0)
        ENDIF
        CLEAR DLLs "ShellExecute", "FindWindow", "PostMessage"
        *INKEY(5)
    ENDIF

INKEY(5)就是机器等待5秒，按键盘的任意键结束等待

我测试，能打开和打印，但不能关闭

将Thisform.pdf.SetShowToolbar(.f.)
改为Thisform.pdf.SetShowToolbar(.T.)
就显示打印工具，点击打印工具即可打印了！

谢谢各位狐友的热情回复，我认真学习一下。