Position du curseur dans l'edit

J'ai montré dans le sujet précédent
qu'il manque des commandes position dans le memo
(voir "position du curseur dans le memo")
mais c'est vrai aussi pour l'édit :
Exemple d'un réceptacle de mot de passe avec remplacement des lettres par des étoiles :

Code:

rem ' Mot de passe avec des étoiles
dim a$
label croix
caption 0,"Tapez le mot de passe"

edit 1 : set_focus 1
on_change 1,croix
print : print

end

croix:
if left$(text$(1),1)<>"*"
 a$=a$+left$(text$(1),1)
 print a$
 text 1,string$(len(text$(1)),"*")
end_if
return

Evidemment, ça marche (avec left$)
mais vous remarquerez que le curseur reste toujours à gauche
alors qu'on devrait pouvoir le forcer à se placer à droite
avec des :
position 1,len(text$(1))
(et je remplacerait left$ par right$ à la ligne 13,)
ce qui serait tout de même plus logique !
(position qui se calculerait en nombre de lettres)

Parce que le problème, ce n'est pas quand moi j'utilise mes programmes,
(j'en connais les limites)
c'est quand je les donne à utiliser à d'autres qui sont seuls pour le faire,
et qui vont trouver cette position du curseur étrange,
et (par exemple) la rendre plus logique en appuyant sur la touche "Fin",
ce qui va rendre les choses effectivement plus logiques, mais ça ne va plus fonctionner !
Alors, c'est gênant.
(je ne sais pas si quelqu'un a une astuce
en attendant ces position qu'on n'ose plus demander à Jack
tellement il a de boulot !)