General information
Category:
ActiveX controls in VFP
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
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