I have a ActiveX component in a container that samples for keystrokes, however dBase also samples and inputs the keystrokes causing duplications on the component. If I filter the ActiveX component using the INKey() function it works great in a Complited EXE but not when running from the designer mode. Any Ideas on how to tell dBase not to push keystrokes to the ActiveX component? I am using dBase db2k 0/3 BDE 5.1.1
Code for inKey()
this.WDMF_BOX.WDMFDSP = new ACTIVEX(this.WDMF_BOX)
with (this.WDMF_BOX.WDMFDSP)
height = 23.5455
left = 0
top = 0
width = 107.2857
printable = false
pageno = 0
license = "Copyright (c) 1995 Wall Data Incorporated"
classId = "{91858523-87B5-11CE-A0B6-0800095A05C3}"
anchor = 6 // Container
endwith
with (this.WDMF_BOX.WDMFDSP.nativeObject)
NumLockOn = class::NATIVEOBJECT_NUMLOCKON
CapsLockOn = class::NATIVEOBJECT_CAPSLOCKON
InsertModeEnabled = class::NATIVEOBJECT_INSERTMODEENABLED
HostStateChanged = class::NATIVEOBJECT_HOSTSTATECHANGED
HostMessageChanged = class::NATIVEOBJECT_HOSTMESSAGECHANGED
HostScreenChange = class::NATIVEOBJECT_HOSTSCREENCHANGE
onReadyToSend = class::NATIVEOBJECT_ONREADYTOSEND
LocalScreenChange = class::NATIVEOBJECT_LOCALSCREENCHANGE
KeyboardLock = class::NATIVEOBJECT_KEYBOARDLOCK
CursorMove = class::NATIVEOBJECT_CURSORMOVE
endwith
function nativeObject_LocalScreenChange(StartingRow, StartingColumn, EndingRow, EndingColumn)
InKey()
return
Thanks
RRIley
Code for inKey()
this.WDMF_BOX.WDMFDSP = new ACTIVEX(this.WDMF_BOX)
with (this.WDMF_BOX.WDMFDSP)
height = 23.5455
left = 0
top = 0
width = 107.2857
printable = false
pageno = 0
license = "Copyright (c) 1995 Wall Data Incorporated"
classId = "{91858523-87B5-11CE-A0B6-0800095A05C3}"
anchor = 6 // Container
endwith
with (this.WDMF_BOX.WDMFDSP.nativeObject)
NumLockOn = class::NATIVEOBJECT_NUMLOCKON
CapsLockOn = class::NATIVEOBJECT_CAPSLOCKON
InsertModeEnabled = class::NATIVEOBJECT_INSERTMODEENABLED
HostStateChanged = class::NATIVEOBJECT_HOSTSTATECHANGED
HostMessageChanged = class::NATIVEOBJECT_HOSTMESSAGECHANGED
HostScreenChange = class::NATIVEOBJECT_HOSTSCREENCHANGE
onReadyToSend = class::NATIVEOBJECT_ONREADYTOSEND
LocalScreenChange = class::NATIVEOBJECT_LOCALSCREENCHANGE
KeyboardLock = class::NATIVEOBJECT_KEYBOARDLOCK
CursorMove = class::NATIVEOBJECT_CURSORMOVE
endwith
function nativeObject_LocalScreenChange(StartingRow, StartingColumn, EndingRow, EndingColumn)
InKey()
return
Thanks
RRIley