Boucle sur des compostants delphi

Ange Angelique Messages postés 47 Statut Membre -
Heremion Messages postés 564 Statut Membre - 7 sept. 2011 à 14:04

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.

Afficher la suite

1 réponse

Réponse 1 / 1
Heremion Messages postés 564 Statut Membre 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
1. Heremion Messages postés 564 Statut Membre 102
  
  Si ce code t'a aidé, penses à marquer le post en [Résolu] :)
  
  0

Boucle sur des compostants delphi

1 réponse

Discussions similaires

Newsletters