Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

Diff of /ooDialog/trunk/ooDialog/EventNotification.cls [r8498] .. [r8499] Maximize Restore

  Switch to unified view

a/ooDialog/trunk/ooDialog/EventNotification.cls b/ooDialog/trunk/ooDialog/EventNotification.cls
...
...
245
::method connectScrollBarEvent external "LIBRARY oodialog en_connectScrollBarEvent"
245
::method connectScrollBarEvent external "LIBRARY oodialog en_connectScrollBarEvent"
246
::method connectEachSBEvent external "LIBRARY oodialog en_connectEachSBEvent"
246
::method connectEachSBEvent external "LIBRARY oodialog en_connectEachSBEvent"
247
::method connectAllSBEvents external "LIBRARY oodialog en_connectAllSBEvents"
247
::method connectAllSBEvents external "LIBRARY oodialog en_connectAllSBEvents"
248
248
249
249
250
::method connectTreeViewEvent
251
   use strict arg id, type, msgToRise = "", willReply = .false
252
   if \ id~dataType("W") then id = self~resolveSymbolicId(id)
253
   if id = -1 then return -1
254
   if msgToRise == "" then msgToRise = "on" || type
255
   type = type~translate
256
   select
257
       when type = "SELCHANGING" then lp = -401
258
       when type = "SELCHANGED"  then lp = -402
259
       when type = "EXPANDING"   then lp = -405
260
       when type = "EXPANDED"    then lp = -406
261
       when type = "BEGINDRAG"   then lp = -407
262
       when type = "BEGINRDRAG"  then lp = -408
263
       when type = "DELETE"      then lp = -409
264
       when type = "BEGINEDIT"   then lp = -410
265
       when type = "ENDEDIT"     then lp = -411
266
       when type = "DEFAULTEDIT" then do
267
            self~addUserMsg("DefTreeEditStarter", 0x0000004E, "0xFFFFFFFF", id, "0xFFFFFFFF", -410, "0xFFFFFFFF")
268
            lp = -411
269
            msgToRise = "DefTreeEditHandler"
270
       end
271
       when type = "KEYDOWN" then lp = -412
272
       otherwise return -1
273
   end
274
275
   tag = 0
276
   if lp == -405 | lp == -406 then do
277
     if willReply then tag = 0x02000006
278
     else tag = 0x00000006
279
   end
280
281
   return self~addUserMsg(msgToRise, 0x0000004E, "0xFFFFFFFF", id, "0xFFFFFFFF", lp, "0xFFFFFFFF", tag)
282
283
284
::method connectTabEvent
250
::method connectTabEvent
285
   use strict arg id, type, msgToRise = "", willReply = .false
251
   use strict arg id, type, msgToRise = "", willReply = .false
286
   if \ id~dataType("W") then id = self~resolveSymbolicId(id)
252
   if \ id~dataType("W") then id = self~resolveSymbolicId(id)
287
   if id = -1 then return -1
253
   if id = -1 then return -1
288
   if msgToRise == "" then msgToRise = "on" || type
254
   if msgToRise == "" then msgToRise = "on" || type
...
...
324
   ret = self~addUserMsg(msgToRise, 0x00000114, "0xFFFFFFFF", wp, "0x0000FFFF", hwnd, "0xFFFFFFFF")  /* WM_HSCROLL */
290
   ret = self~addUserMsg(msgToRise, 0x00000114, "0xFFFFFFFF", wp, "0x0000FFFF", hwnd, "0xFFFFFFFF")  /* WM_HSCROLL */
325
   if ret <> 0 then return ret
291
   if ret <> 0 then return ret
326
   return self~addUserMsg(msgToRise, 0x00000115, "0xFFFFFFFF", wp, "0x0000FFFF", hwnd, "0xFFFFFFFF")  /* WM_VSCROLL */
292
   return self~addUserMsg(msgToRise, 0x00000115, "0xFFFFFFFF", wp, "0x0000FFFF", hwnd, "0xFFFFFFFF")  /* WM_VSCROLL */
327
293
328
294
295
::method connectTreeViewEvent external "LIBRARY oodialog en_connectTreeViewEvent"
329
::method connectListViewEvent external "LIBRARY oodialog en_connectListViewEvent"
296
::method connectListViewEvent external "LIBRARY oodialog en_connectListViewEvent"
330
::method connectDateTimePickerEvent external "LIBRARY oodialog en_connectDateTimePickerEvent"
297
::method connectDateTimePickerEvent external "LIBRARY oodialog en_connectDateTimePickerEvent"
331
::method connectMonthCalendarEvent external "LIBRARY oodialog en_connectMonthCalendarEvent"
298
::method connectMonthCalendarEvent external "LIBRARY oodialog en_connectMonthCalendarEvent"
332
::method connectUpDownEvent external "LIBRARY oodialog en_connectUpDownEvent"
299
::method connectUpDownEvent external "LIBRARY oodialog en_connectUpDownEvent"
333
300