Discussion :

[gilardino]

Salut cher développeurs

Je voudrais savoir comment positionner automatiquement un curseur, pour écrire dans un champ de type Tedit, exemple :

Disant que je dispose d’une fiche avec deux composant de type TEDIT (edit1 et edit2)
Sur l’événement OnExit du champ edit1 je veux produire le code source suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
procedure form1.edit1Exit(Sender: TObject);
begin
if (condition) then laisser le curseur se positionner sur edit2
else faire revenir le curseur à edit1 (empêcher le de sortir)
end;

et merci d'avance

[Nono40]

Avec un Edit1.SetFocus.

[gilardino]

merci, problème résolu