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

A voir également:

Boucle sur des compostants delphi
Delphi 7 - Télécharger - Langages
Xiaomi s'éteint tout seul et se rallume en boucle - Forum Xiaomi
Mise à disposition de boucle locale dédiée ✓ - Forum Freebox
Vlc lecture en boucle ✓ - Forum Lecteurs et supports vidéo
Redémarrage en boucle Xiamo mi note 10 - Forum Xiaomi

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 ;

Heremion Messages postés 564 Statut Membre 102

Si ce code t'a aidé, penses à marquer le post en [Résolu] :)

Discussions similaires

Mon pc s'allume et s'éteint en boucle

Mon ordinateur s'allume et s'eteint en boucle

Mon PC s'allume puis s'éteint tout seul. Que faire ?

aide pour trouver le numéro de série l'installation de delphi 7

problème tv décodeur orange

Discussions similaires

Newsletters