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

问题描述

我使用此代码制作了一个示例应用，它适用于所有打印机 - 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 子句也相同。

解决方法

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

m0