Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Default Object
Message
De
19/10/2014 14:08:02
Lutz Scheffler
Lutz Scheffler Software Ingenieurbüro
Dresden, Allemagne
 
 
À
19/10/2014 14:00:52
Information générale
Forum:
Visual FoxPro
Catégorie:
Programmation Orientée Object
Titre:
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 8.1
Network:
SAMBA Server
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01609619
Message ID:
01609631
Vues:
42
Hank,

thanks.

I had this idea too - but if this is in the wrong container it needs a while. And it would run even if there is no such object.

>I would recurse down the object tree from FORM, looking for commandbuttons as the base object, and check whether Default = .T. Alternatively, checking each object for whether it has a Default property and checking whether it is .T.
>
>Or am I missing something?
>
>Hank
>
>>Hi Folks,
>>
>>I look for an idea to figure out what object on a form is the default one, i.e. the one that has the DEFAULT property true
>>
>>Background:
>>
>>I have a rather tricky grid that recieves the Enter key and performs stuff. Sometimes just some internal blabla, sometimes it performs an action directly bound to the key.
>>
>>I think I can tetermine what of the above, but the problem is how to rise the default objects default action (Click) / or not. For the moment it's simply doing nothing with the default object
>>
>>the code in the grid's textbox looks
>>
>> DO CASE
>>  CASE tnKeyCode = 13
>>*<Enter>
>>   NODEFAULT
>>  CASE INLIST(tnKeyCode,5,24) AND tnShiftAltCtrl=0
>>*<Up>,<Down>
>>   .SETFOCUS()
>>  CASE tnKeyCode = 27
>>*<ESC>
>>   NODEFAULT
>>...
>>
>>
>>If I compare with ESC I see no difference (even in the keypress stuff around objects keypress , since form is KeyPreview = .T.), this is checkes with SET COVERAGE.
>>
>>Both keys just differ in the way they run throug this case.
>>
>>After the keypress is ended, ESC raises the events that will end up with the Click of Cancel- object Enter just does nothing.
>>
>>Well, I can not figure that out. O.K. But then, how do I raise default objects Click?
>>
>>TIA
>>
>>Lutz
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord

Weeks of programming can save you hours of planning.

Off

There is no place like [::1]
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform