Discussion :

[Bouillon]

Bonjour,

je cherche à placer le curseur au début d'un Edit.
Mettons que j'ai plusieurs Edit et je veux placer le curseur
au début d'un Edit particulier sans cliquer sur ce dernier
pour être prêt à y taper un mot.

Merci à vous

BB

[Pedro]

Salut
et SetFocus

[sofiane44]

bonjour,
ActiveControl:=Edit1;
ActiveControl:=Edit2;
.....
ActiveControl:=Button1;
...

[Bouillon]

Merciii,

j'avais une dernière question à propos des Edit.
Y-a-t-il moyen d'accepter le contenu d'un Edit avec la touche "Enter"
plutôt que de valider le contenu en cliquant sur un Button.

Merci à vous.

BB

[Pedro]

j'avais une dernière question à propos des Edit.
Y-a-t-il moyen d'accepter le contenu d'un Edit avec la touche "Enter"
plutôt que de valider le contenu en cliquant sur un Button.

Qu'appelles-tu "Valider" ?

[TicTacToe]

Tu peux essayer d'utiliser l'evt OnKeyDown de ton edit comme ceci:

Code :

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

1
2
3
4
5
procedure TMaForm.EditMonTexteKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
     if Key = Vk_RETURN then ... // traitment de validation
end;

[edam]

si vous ne déplassé pas entre tes Tedit avec entrée tu peut mettre à true la property TButton.Default