Class TVicLPT16 (unit Hw_16)

Inherits from

TComponent

Constructors


constructor Create(owner:TComponent);



Functions

function BUSY:Boolean;


function PE:Boolean;


function PrintChar(ch:Char):Boolean;


function SLCT:Boolean;


function _ACKWL:Boolean;


procedure _AUTOFD(Flag:Boolean);


function _ERROR:Boolean;


procedure _INIT;


procedure _SLCTIN;


procedure _STROBE;


function ReadPin(nPin : TPinNumber) : Boolean;


procedure SetIRQ(St:Boolean);


procedure SetLPT(nLPT:TLPTNumber);


procedure WritePin(nPin : TPinNumber; Value : Boolean);


Properties

property BasePort : Word


property CommandPort : Word


property IRQEnabled : Boolean


property LPT : TLPTNumber


property StatusPort : Word


property Pin : Boolean


Events

Variables

fBasePort : Word;


fCommandPort : Word;


fDataPorts : array[0..2] of Byte;


fIsIRQSet : Boolean;


fLPTNumber : TLPTNumber;


fStatusPort : Word;



Constructors


constructor Create(owner:TComponent);


Functions


function BUSY:Boolean;


function PE:Boolean;


function PrintChar(ch:Char):Boolean;


function SLCT:Boolean;


function _ACKWL:Boolean;


procedure _AUTOFD(Flag:Boolean);


function _ERROR:Boolean;


procedure _INIT;


procedure _SLCTIN;


procedure _STROBE;


function ReadPin(nPin : TPinNumber) : Boolean;


procedure SetIRQ(St:Boolean);


procedure SetLPT(nLPT:TLPTNumber);


procedure WritePin(nPin : TPinNumber; Value : Boolean);


Properties


property BasePort : Word


property CommandPort : Word


property IRQEnabled : Boolean


property LPT : TLPTNumber


property StatusPort : Word


property Pin : Boolean


Events


Variables


fBasePort : Word;


fCommandPort : Word;


fDataPorts : array[0..2] of Byte;


fIsIRQSet : Boolean;


fLPTNumber : TLPTNumber;


fStatusPort : Word;