OnComboClick event not happening

BarryStevens

I have the following code that creates a combo dropdown.
The dropdown shows but when item is selected I dont appear to be getting the onComboClick event.
Am I missing something and can you confirm how I show be trapping it.

Equ OleSubClass$ To "MAINMENU.OLE_SUBCLASS"
CtrlId = @Window:".DWELLING_TYPE"
Handle = Get_Property(CtrlId, "HANDLE")
rv = Exec_Method(OleSubClass$, "OLE.Subclass", Handle, CtrlId)

PropertyID=getproperty("@.PROPERTY_ID","TEXT")
Gosub InitDwellingTypeDropDown
DwellingTypes= combo_load_proc("","COMBO_LISTS","DWELLING_TYPE",1)
Convert @fm To @vm In DwellingTypes
ExisingKeys=xlate("PROPERTIES_SOLD_DATA_RESIDENTIAL_REL",PropertyID,1,"X")

Cnt=fieldcount(DwellingTypes,@vm)
DwellingTypesDrop=null$
for X = 1 to Cnt
Locate PropertyId:"*":DwellingTypes<0,X> In ExisingKeys setting foo Then
RecordExists="Yes"
End Else
RecordExists=''
end
DwellingTypesDrop:=DwellingTypes<0,X>:@fm:RecordExists:@rm
next X

*Bys = 'A'
* Justs = 'L'
* call V119('S', '', Bys, Justs, DwellingTypesDrop, '')

DwellingTypesDrop[-1,1]=null$

convert @rm to @tm in DwellingTypesDrop
convert @fm to @stm in DwellingTypesDrop

DwellingTypeDropDown<2,3>=DwellingTypesDrop

CtrlId=@Window:".DWELLING_TYPE"
Convert "." to ";" in CtrlId
Set_Property(OleSubClass$, "OLE.Combo[":CtrlId:"]", DwellingTypeDropDown)
Set_Property(OleSubClass$, "OLE.MouseWheelDisabled[":CtrlId:"]", Yes$)

BarryStevens

This is OI10

BarryStevens

I have the subclass on the mdi form now.

Equ OleSubClass$ To @Window:".OLE_SUBCLASS"

Still no OLE event.

The ole event is set on the control to call the commuter module which is setup.

DonBakke

Just a quick observation, are you sending a QUALIFY_EVENT message to the control? I don't seem to see where you are doing that.

BarryStevens

Thank you.
No I am not.

DonBakke

All right. Please let us know if that ends up fixing the issue.

BarryStevens

Yep, fixed

DonBakke

Sweet...and phew.

BarryStevens

Where in the documentation should I have seen that I need to QUALIFY_EVENT

BarryStevens

... or should I have just known as it was not a 'normal' event. OI10 has just sucked my brain

DonBakke

That's been a part of how OI exposes OLE events (as well as WINMSG messages) from the very beginning (OI 4.x and higher). It's been documented in various places, including the Programmer's Reference Guide and our own white paper on Using OLE in OpenInsight white paper.

BarryStevens

Thanks, like I said, I just forgot. Haven't used it for a while in a new system.