Prog

Résolu

nassim00b Messages postés 2 Date d'inscription mardi 15 décembre 2015 Statut Membre Dernière intervention 29 décembre 2015 - 15 déc. 2015 à 10:52
nabil-bago Messages postés 255 Date d'inscription mercredi 22 mai 2013 Statut Membre Dernière intervention 24 novembre 2021 - 15 déc. 2015 à 12:49

j'ai inséré des edit et je j'ai limité dans mes tables la longueur des champs
par exmpl: edit5 sa longueur dans la table est 10 caracteres
je voulais que lorsque je saisis dans l'édit ,dés que arrive 10 caracteres insérés il saute vers autre edit
je voudrais SVP un Code source
merci

A voir également:

Pascal prog
$Prog - Forum PHP
Prénom pascal en arabe - Forum Delphi / Pascal
Code pascal exemple - Forum Delphi / Pascal
Longint pascal ✓ - Forum Delphi / Pascal
Ord pascal - Forum Delphi / Pascal

2 réponses

Réponse 1 / 2

Yanb
15 déc. 2015 à 12:45

Bonjour !

procedure TForm1.EditChange(Sender: TObject);
begin
  if Length(TEdit(Sender).Text) = 10 then
    Perform(WM_NEXTDLGCTL, 0, 0);
end;

Réponse 2 / 2

nabil-bago Messages postés 255 Date d'inscription mercredi 22 mai 2013 Statut Membre Dernière intervention 24 novembre 2021 1
15 déc. 2015 à 12:49

Bonjour

//evenement OnChange de edit1
procedure TForm1.EditOnChange(Sender: TObject);
begin
  if Length(edit1.Text) = 10 then  // si la longueur de l'edit = 10 
    Edit2.SetFocus;       // alors place le curseur dans le edit suivant
end;

Discussions similaires

Lancer une appli avec un prog en C

Appel d'une procédure

Unité Maths dans delphi?

Comment écrire une valeur en hexa dans un prog delphi

Un petit prog pour réparer ?....

Votre réponse

Discussions similaires