|
|
|
{*********************************************************}
{* HDTCC.PAS 1.00 *}
{* Copyright (c) Halkyon Development Team 1999 *}
{* All rights reserved. *}
{*********************************************************}
unit HDTCC;
{- Common constants between printer drivers and controller component.}
interface
uses
Messages;
const
DefFileName = 'C:\DEFAULT.HDT';
PipeTimeout = 5000; { ms }
PipeName = '\\.\pipe\HDT4009';
SemaphoreName = 'HDT4009Sem';
RegKey = '\SOFTWARE\Halkyon\HDT4009\Settings';
IniFileName = 'HDTPDENG.INI';
IniSection = 'Settings';
IniKey = 'AutoExec';
hdt_First = WM_USER; {Sets base for all HDT messages}
hdt_BeginDoc = hdt_First+101; {printer driver starts printing} {!!.10}
hdt_InsPaper = hdt_First+102; {printer driver requests paper} {!!.10}
hdt_PrtError = hdt_First+103; {printer driver reports error} {!!.10}
hdt_EndDoc = hdt_First+104; {printer driver has finished printing} {!!.10}
{Event codes:}
eNull = 0;
eStartDoc = 1;
eEndDoc = 2;
eSetFileName = 3;
eInsertPaper = 5;
ePrinterErr = 6;
EVENT_PAPER_INSERTED = '1';
{$IFDEF Win32}
type
TPipeEvent = record
Event : Byte;
Data : ShortString;
end;
{$ENDIF Win32}
implementation
end.
Back
|
|
About - Business - Experience
- Projects Copyright © 2001 Halkyon Development Team Ltd. |