Back


{*********************************************************}
{*                     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


info@halkyon.com