打印机上的 CloseFile 命令无法打印

时间:2021-02-10 12:36:18

标签: delphi devexpress vcl

我使用此代码制作了一个示例应用,它适用于所有打印机 - USB、网络等:

AssignPrn(lOutputFile);
Rewrite(lOutputFile);

for liIndex := 0 to lsLines.Count-1 do
    Writeln(lOutputFile, lsLines[liIndex]);

CloseFile(lOutputFile);

在示例应用程序的 CloseFile(lOutputFile); 上,控制进入 VCL 文件和打印工作。

当我将此代码集成到主应用程序中时,在 CloseFile(lOutputFile) 上,控制权以 dxPSPopupManKeyboardHook 方法进入 DevExpress 文件,并且不打印。

两个应用都使用相同的 IDE 设置,uses 子句也相同。

1 个答案:

答案 0 :(得分:4)

要选择正确的函数,请使用完全限定的名称:

m0
相关问题