cs_benumiit82
Messages postés32Date d'inscriptionmardi 23 mars 2004StatutMembreDernière intervention11 avril 2006
-
12 mars 2005 à 12:38
flamgreg
Messages postés12Date d'inscriptionsamedi 29 novembre 2003StatutMembreDernière intervention 4 avril 2007
-
13 mars 2005 à 15:03
Bonjour,
voila ma question est très simple... sur ma fenetre j'ai plein de caption, de edit...
Je voudrais savoir si y'a une syntaxe qui permettrais de toutes les effacées.
Moi je dois me farcir toutes des lignes de codes :
flamgreg
Messages postés12Date d'inscriptionsamedi 29 novembre 2003StatutMembreDernière intervention 4 avril 2007 13 mars 2005 à 15:03
tu peux aussi faire ça avec tout les composants
Je te donne la procedure perso que j'ai faite.
Procedure Nettoie_Facture;
var
iBoucle : integer;
begin
with frmPrincipal do
begin
for iBoucle := 0 to ComponentCount -1 do
begin
if Components[iBoucle] is TLabeledEdit then
begin
TLabeledEdit(Components[iBoucle]).Clear;
end;
end;