Discussion :

[gentilman_delphi]

Salut tout le monde


Sur un 'dbedit' j'ai limité l'ecriture du champ correspondant ça veut dire sur le dbedit, l'utilisateur ne peut saisit que 2 caractere.

Ce que je veut c'est apres la saisie des 2 caracteres le dbedit devient (disable veut dire not enable) et un autre composant reçoit la focalisation

Merci pour vos contributions.

[ero-sennin]

Salut,

J'ai 2 TEdit sur ma Form, l'Edit1 à la propriété MaxLength à 2 ... Voici un code qui illustre ton soucis :

Code :

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

1
2
3
4
5
6
7
8
9
procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Length(Edit1.Text)=Edit1.MaxLength then
  begin
    Edit2.SetFocus;
    Edit1.Enabled:=false;
  end;
end;

Ca vaut ce que ça vaut, mais ça fonctionne
A+