>I am doing it slightly differently.
>Tell me what I am doing wrong, please.
>Form' Init:
>SET PROCEDURE TO D:\foxframework\classes.fxp ADDITIVE
>cntTest1 = NEWOBJECT('cntTest1', 'd:\foxframework\classes.fxp')
>ThisForm.AddObject("ComReader","ComReader")
>EVENTHANDLER(ThisForm.ComReader.Object, cntTest1)
>*!* definition of cntTest1:
>DEFINE CLASS cntTest1 as CUSTOM
>IMPLEMENTS DMSCommEvents IN "MSCommLib.MSComm"
>PROCEDURE DMSCommEvents_OnComm() AS VOID;
>HELPSTRING "Occurs whenever the value of the CommEvent property changes."
> * add user code here
>ENDPROC
>ENDDEFINE
>
>So, how do I read INPUT?

Without seeing more code showing all the containership - impossible to tell ;-) I'll hazard a guess:

THISFORM.ComReader.WhateverTheControlNameIs.INPUT