Setpos in get with picture

[ctoas]

Good afternoon and forgive my English.

Positioning cursor in get fields using setpos does not work?

Code: Select all  Expand view

@ 144,320 GET oGetCEP VAR cCEP PICTURE "99999-999" OF oDlgCLIENTES2 SIZE 046,012 PIXEL COLORS nRGB(000,000,255)
oGetCEP:nStyle := nOR( oGetCEP:nStyle, ES_LEFT )
oGetCEP:bGotFocus := { || oGetCEP:SetPos( 0 ) }
 

Thanks

[Antonio Linares]

Try it using 1:

oGetCEP:bGotFocus := { || oGetCEP:SetPos( 1 ) }

[joseluisysturiz]

Good afternoon and forgive my English.

Positioning cursor in get fields using setpos does not work?

Code: Select all  Expand view

@ 144,320 GET oGetCEP VAR cCEP PICTURE "99999-999" OF oDlgCLIENTES2 SIZE 046,012 PIXEL COLORS nRGB(000,000,255)
oGetCEP:nStyle := nOR( oGetCEP:nStyle, ES_LEFT )
oGetCEP:bGotFocus := { || oGetCEP:SetPos( 0 ) }
 

Thanks

Probandolo y trabaja bien asi como lo tienes...

Code: Select all  Expand view

REDEFINE GET aGet[2] VAR aVar[2] ID 4006 OF oFldx:aDialogs[1] PICTURE oPi:nPi10 UPDATE // NUM.CED.

aGet[2]:bGotFocus := { || aGet[2]:SetPos( 0 ) }