Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Major Bug - BINDEVENTS
Message
 
 
À
23/12/2004 00:27:37
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00971680
Message ID:
00971768
Vues:
32
I can repro this in VFP8SP1 where it works as you expect it, and how it has changed in VFP9. I am not sure though I would expect the value you do in VFP9, but I do see your point. I modified your code to do the actual repro:
local oevent, ohandler
oevent = CREATEOBJECT([cntevent])
ohandler = CREATEOBJECT([cnthandler])
BINDEVENT(oevent,[dothisthing],ohandler,[dothisthing],1)

? oevent.dothisthing()

*-- Class:        cntevent
*-- ParentClass:  container
*-- BaseClass:    container
*-- Time Stamp:   12/22/04 08:50:04 PM

DEFINE CLASS cntevent AS container
       Name = "cntevent"

       PROCEDURE dothisthing
          LPARAMETERS tcThing
       ENDPROC
ENDDEFINE

*-- Class:        cnthandler
*-- ParentClass:  container
*-- BaseClass:    container
*-- Time Stamp:   12/22/04 08:51:12 PM

DEFINE CLASS cnthandler AS container
       PROCEDURE dothisthing
          LPARAMETERS tcThing
          RETURN .F.
       ENDPROC
ENDDEFINE
Mark McCasland
Midlothian, TX USA
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform