General information
Category:
COM/DCOM and OLE Automation
Title:
Using mscomm in _screen.
Environment versions
Network:
Windows 2000 Server
I'm trying to use MSCOMMLib.MSComm to read serial data from a printer. I have no problem using the control on a form. I would like to create the object before any forms are created so that I can read the status of the printer at all times. (I don't want to keep a form in the background just to contain this object.)
At first I thought it would be as easy as this:
Ocomm=createobject('mycomm')
define class Mycomm as MSCOMMLib.MSComm
proc oncomm
**** code here
endproc
enddefine
I get an error message class definition mycomm not found!
I then found some other code that talked about binding events. So I tried this:
PUBLIC lomodemcomm as MSCOMMLIB.MSComm
loModemComm = Createobject("MSCOMMLib.MSComm")
loModemComm.Settings='9600,n,8,1'
lomodemComm.Handshaking=1
oHandler=Newobject("myhandler")
loVFPCOM = Newobject("VFPCOM.ComUtil")
loVFPCOM.BindEvents(loModemComm, oHandler)
lomodemComm.portOpen=.t.
Define Class myhandler As custom
Procedure oncomm
***code here
endproc
Enddefine
When I run this code everything works until the event fires, then it crashes foxpro and want to send the dubug code to microsoft.
Does anyone any infomation that could help me out...
thanks
Tim Boccaleri
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only