topic-45547

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

ENTER desde otro control SOLUCIONADO
Posted: Wed Mar 19, 2025 01:36 AM

HOla amigos,,,,,

Tengo un GET cuyo valor ser llenado desde otro control:

REDEFINE oVar VAR cVar ......

...

REDEFINE BTNBMP oAct ACTION (cVar := "12345", oVar:Refresh(), ????? ) ...... <--- aqui en ???? con le hago para simular un ENTER en oVar

GRacias....

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: ENTER desde otro control
Posted: Wed Mar 19, 2025 05:41 AM

Willi,

Prueba con oVar:KeyChar( VK_ENTER )

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveWiDi

Posts: 1445

Joined: Mon Oct 10, 2005 02:38 PM

Re: ENTER desde otro control
Posted: Wed Mar 19, 2025 08:48 AM

Willi Quintana wrote: HOla amigos,,,,,
Tengo un GET cuyo valor ser llenado desde otro control:
REDEFINE oVar VAR cVar ......
...
...
REDEFINE BTNBMP oAct ACTION (cVar := "12345", oVar:Refresh(), ????? ) ...... <--- aqui en ???? con le hago para simular un ENTER en oVar

GRacias....

Prueba esto:

Para un GET
oVar:cText( "12345" )
oVar:Refresh()

Para un SAY
oVar:Varput( "12345" )
oVar:Refresh()

Un Saludo

Carlos G.

FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

JESUS MARIN

Posts: 199

Joined: Wed Jan 02, 2019 08:36 AM

Re: ENTER desde otro control
Posted: Wed Mar 19, 2025 12:46 PM

Buenas

Si solo quieres simular el ENTER en el Get, prueba :

Code: Select all Collapse

 ACTION (cVar := "12345", oVar:Refresh(), EVAL( oVar:bLostFocus ) )

Jesús Marín
deumare@gmail.com

MGA

Posts: 1286

Joined: Mon Feb 25, 2008 02:54 PM

Re: ENTER desde otro control
Posted: Thu Mar 20, 2025 08:53 PM

ACTION (cVar := "12345", oVar:Refresh(), EVAL( oVar:bValid ) )

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Re: ENTER desde otro control SOLUCIONADO
Posted: Thu Mar 20, 2025 11:58 PM

Estimadoa migos,

Gracias por los aportes, probe todos, el mas eficiente es el de MGA, gracias mil.

ACTION (cVar := "12345", oVar:Refresh(), EVAL( oVar:bValid ) )

FiveTech Support Forums

Continue the discussion