Modifier tous mes tdbedit en une fois

webident Messages postés 23 Date d'inscription lundi 26 mai 2003 Statut Membre Dernière intervention 10 février 2006 - 12 juin 2003 à 14:43
cs_Bestiol Messages postés 833 Date d'inscription dimanche 6 janvier 2002 Statut Membre Dernière intervention 3 novembre 2005 - 12 juin 2003 à 14:55
Voila,
J'ai une form avec une trentaine de tdbedit et j'aimerai les rendres enabled par moment et par d'autre moment non-enabled, existe t'il une commande pour faire cela sans devoir crée une procedure avec une ligne par tdbedit.

Merci d'avance

Gaëtan
www.web-e-media.com

1 réponse

cs_Bestiol Messages postés 833 Date d'inscription dimanche 6 janvier 2002 Statut Membre Dernière intervention 3 novembre 2005 1
12 juin 2003 à 14:55
Tu peux faire une procédure en quelques lignes qui fera le travail...

Pour rendre tous tes TDBEdit en Enabled = True :
for i := 0 to ComponentCount - 1 Do
  If Components[i] is TDBEdit then
  TDBEdit(Components[i]).Enabled := True;


Il ne te reste plus qu'à adapter en fonction de ce que tu veux faire !

Bonne prog' !
[mailto:bestiol@cario.fr Bestiol.]
0
Rejoignez-nous