Unit MyCom |
A testcomponent for communicating with RS-232 developed by JKl productions // This is freware and mainly produced, because I couldn't find any such component with source for Delphi. The product is meant as a test component, and errors etc. may still occur but I haven't found anything serious. There is still lot's of space for improvement etc. and you are welcome to update and use this unit. // For comments and ideas, adress to Jesper Kleis Email: CAVA@Image.DK
Classes |
TComm -
Functions |
Register -
Types |
pComm
TBaud
TComError
tDataBit
tFlowControl
tParitet
tPort
tStopBits
Constants |
Variables |
Functions |
Types |
pComm=^TComm
TBaud=(b110,b300,b1200,b2400,b4800,b9600,b14400,b38400,b56000, b57600,b115200,b128000,b256000);
TComError=procedure (Sender : Tobject;ECode : integer) of object
tDataBit=4..8
tFlowControl= (Hardware,XON_XOFF);
tParitet=(Zero,Odd,Even,Binary0,Binary1);
tPort=(COM1,COM2,COM3,COM4,COM5,COM6,COM7,COM8);
tStopBits=(s10,s15,s20);
Constants |
Variables |