Discussion :

[Bourak]

Salut tous le monde

Jai crée un programme sert à saisie des horaires.
Ce programmes contient 112 maskedit.
Je voudrais formaté ces 112 maskedit: la cas normal c'est d'ecrire le nom du chaque maskedit
comme ceci:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
procedure tform1.formate ;
begin
maskedit1.clear;
maskedit2.clear;
.
.
.
.
maskedit112.clear;
 
end;

Mais il n'ya pas une methode de le formaté avec une seule commande ou une seule ligne pour optimisé mon programme ?


Merci d'avance

[qi130]

Oui, avec FindComponent...

C'est un cas fréquemment rencontré, et une recherche sur le forum t'aidera sûrement

[Bourak]

merci pour votre aide qi130

J'ai trouver la solution :

Code :

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

1
2
3
 
for i:= 1 to 112 do
  TMaskedit(FindComponent('maskedit'+inttostr(i))).Clear;