Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
ON KEY LABEL x THIS
Message
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Miscellaneous
Thread ID:
00614641
Message ID:
00615721
Views:
17
>Oi Geraldo,
>
>Uma alternativa seria chamar o método usando o nome físico do arquivo .SCX. Veja se o seguinte código te ajuda:
>
>
>LOCAL lcNomeForm
>LOCAL lcChamada
>
>lcNomeForm = JUSTSTEM(SYS(1271, THISFORM))
>lcChamada = lcNomeForm + ".IncluiDOC()"
>
>ON KEY LABEL CTRL+INS &lcChamada.
>
>
>Um abraço!

Pessoal,

já tive um problema parecido fazendo um menu, mas resolvi de uma maneira um pouco mais simples:
LOCAL xForm

xForm = ThisForm

ON KEY LABEL CTRL+INS xForm.IncluiDOC()
Assim, a gente "economiza" uma variável, duas chamadas de função (JUSTSTEM() e SYS()) e mais a macro-substituição (&). :)

Abraço,

Alonso
Like Frank said: "I did it... MY WAY!"
Previous
Reply
Map
View

Click here to load this message in the networking platform