FiveTech Support Forums

Gente quiero mover el cursor a un get especifico despues que presiono enter
en el valid le puse esta instruccion PostMessage(:hwnd, WM_SETFOCUS) no va al get que quiero sino al siguiente
control .

Aqui fragmento de mi codigo: Intento que del get 3 se vaya al get 6

DEFINE DIALOG oDlgVr RESOURCE "DLG_ITEM_VOU" TITLE "Item de Voucher"

REDEFINE GET oGet VAR cApCtaCte ID 101 OF oDlgVr PICTURE "@!"

REDEFINE GET oGet VAR cTipOri ID 102 OF oDlgVr UPDATE valid eval({|| PostMessage(oDlgVr:aControls[6]:hwnd, WM_SETFOCUS),.t.})

REDEFINE GET oGet VAR cSerOri ID 103 OF oDlgVr UPDATE

REDEFINE GET oGet VAR cNumOri ID 104 OF oDlgVr PICTURE &DOCPIC UPDATE

REDEFINE GET oGet VAR cMedpag ID 142 OF oDlgVr UPDATE PICTURE '@!'

REDEFINE GET oGet VAR cMonOri ID 105 OF oDlgVr PICTURE "@!" UPDATE

ACTIVATE DIALOG oDlgVr CENTERED


Intente con oDlgVr:aControls[6]:SetFocus() se sigue al sgte. control
me podrian ayudar, gracias


Uso. Fwh8.11, xharbour build 1.1.0 (Simplex) (Rev.6195), pellesC

Hol artu:

Es mucho mas facil de lo que lo has hecho, para posicinar el foco en un objeto es:

Nombre del Objeto:SetFocus()

Un saludo
JLL