Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Subclassing MSComm Control
Message
From
18/07/2000 15:05:32
Gregg Geeslin
Kwajalein Range Services
Apo, California, United States
 
 
To
18/07/2000 14:25:52
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
00393493
Message ID:
00393979
Views:
17
Thanks, Jon, that was just what I was missing.

We'd end up with something like this:
*
* Save this to temp.prg and run it.
*
PUBLIC x
x = NewObject('temp','temp.prg')
x.Show()

*
**************************************************
*-- Class: temp
*-- BaseClass: form
*
DEFINE CLASS temp AS form

AutoCenter = .T.
Visible = .T.
LockScreen = .F.
Name = "Form1"

ADD OBJECT OleControl1 AS OleMsComm WITH ;
Top = 0, ;
Left = 0, ;
Height = 100, ;
Width = 100, ;
Visible = .F., ;
Name = "Olecontrol1"

ENDDEFINE
*
DEFINE CLASS OleMsComm AS OLECONTROL
OLECLASS = 'MSCommLib.MsComm.1'
ENDDEFINE
*
******************************************

I tried it and it works. Is it possible to add activex controls like this one to containers other than forms? That was what Tom was trying to do.

Gregg
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform