Boucle sur des compostants delphi

Ange Angelique Messages postés 43 Date d'inscription   Statut Membre Dernière intervention   -  
Heremion Messages postés 538 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je voudrai faire une boucle qui active tous les adoquery de mon application, j'ai essayé quelque chose qui bien évidemment ne marche pas (pour une seule form)

var i: integer;

for i:=1 to 3 do
adoqueryi.open;

Bien sure adoquery n'est pas reconnu, pouriez vous m'orienter svp.

Le question peut s'étendre sur plein de composants.

Merci.


A voir également:

1 réponse

Heremion Messages postés 538 Date d'inscription   Statut Membre Dernière intervention   102
 
Essaie un truc du genre :
for i := 0 to Self.ComponentCount - 1 do
begin
    if ((Components[i] is TADOQuery) then
      (Components[i] as TADOQuery).Open ;
end ;

0
Heremion Messages postés 538 Date d'inscription   Statut Membre Dernière intervention   102
 
Si ce code t'a aidé, penses à marquer le post en [Résolu] :)
0