Question

我在网上搜索了这个主题，但我发现的只是VB和C＃解决方案。有人知道VFP 9中是否有办法在RichTextBox中打印出内容？

Answer 1

以下fox pro代码启用了一个名为selprint的函数，可用于打印RTB的内容

    cdlPDReturnDC=256
    cdlPDNoPageNums=8
    cdlPDSelection=1
    cdlPDAllPages=0

    Thisform.CommDlg1.Flags = cdlPDReturnDC + cdlPDNoPageNums
    If Thisform.RTF1.SelLength = 0
    Thisform.CommDlg1.Flags = Thisform.CommDlg1.Flags ;
    + cdlPDAllPages
    Else
    Thisform.CommDlg1.Flags = Thisform.CommDlg1.Flags ;
    + cdlPDSelection
    EndIf
    Thisform.CommDlg1.ShowPrinter
    Thisform.RTF1.SelPrint(Thisform.CommDlg1.hDC)

如何在FoxPro中的RichTextBox中打印内容

1 个答案: