In my textfield.keypressed i have this

LPARAMETERS nKeyCode, nShiftAltCtrl

do case
case nkeycode = F3
this.value = "BUY"
case nkeycode = F4
this.value = "SEEL"
case nkeycode = F5
this.value = alltrim(this.value) + " EUR"
case nkeycode = F6
this.value = alltrim(this.value) + " USD"
case nkeycode = F7
this.value = alltrim(this.value) + " PTE"
endcase
keyboard chr(6) && END key

the problem is the cursor stays allways in the beginnig of the textfield and i want it in the end.

What to do ??? what to do ???

Thank you ALL

João