EListError avec indice de liste hors limites(21)

Version imprimable

j'ai un TIBQuery nommé qyGeneriques qui "plante" sur l'instruction Open :
"indice de liste hors limites(21)".
remarque : 21 est le nombre de champs persistants du TIBQuery.
Je ne vois pas d'où peut provenir l'erreur et pourquoi sur le open ?
Quelqu'un a t il une idée svp. merci d'avance
Code:

1 2 3 4 5 6 7 8 9 10 11 with qyGeneriques do begin SQL.Clear; SQL.AddStrings(slSQLInitGen); Close; setQyeryParams(qyGeneriques, true); // SQL.SaveToFile('C:\TEMP\qyGen.sql'); Open; First; end;

17/03/2011, 15h25
Cl@udius

Salut

Ces quelques lignes ne sont pas a priori très parlantes.
Tu as des événements AfterOpen ou AfterScroll qui poseraient problème ?

La définition des champs persistants est-elle correcte (un champ persistant absent de la requête) ?

EListError, inattendu sur un Open ? :koi:

@+
17/03/2011, 15h51
jakouz

bonjour Cl@udius,

aucun évènement est relié au TIBQuery dans l'inspecteur d'objet. Quant aux champs persistants je les ai obtenu avec un double-click sur le composant TIBQuery puis click droit "ajouter des champs" dans l'éditeur de champs (donc ces champs existent dans la requête). as tu besoin d'autre informations ?
17/03/2011, 15h54
Cl@udius

C'est bien sur Open que cela plante, et non à l'appel de setQueryParams ?

Si oui, supprime temporairement tes champs persistants pour s'assurer qu'ils sont bien en cause.

@+
17/03/2011, 16h19
jakouz

oui c'est bien sur l'instruction Open que ça plante. si je supprime temporairement les champs persistants, ça marche (mais ça plante plus loin dans le code ...)
17/03/2011, 16h34
Cl@udius

Citation:

Envoyé par jakouz

[...] mais ça plante plus loin dans le code ...

Ah et ça plante sur quoi ?

Car, sauf erreur de ma part, il n'y a pas de relation entre un TDataSet (ou un descendant) et la classe d'exception EListError.

[Edit]
Un Echec sur le Open devrait te renvoyer une exception de type EIBxxxError.
17/03/2011, 16h47
jakouz

oui c'est pour cela que je ne comprend pas le type de l'erreur par rapport au contexte. remarque : la requete en elle même fonctionne car je l'ai testé dans un autre outil que Delphi (SQL manager for Interbase). cela me rend un 11 enregistrements. Donc je n'ai pas vraiment de pistes où creuser pour corriger ce bug !
17/03/2011, 16h55
Cl@udius

Si 21 correspond au nombre de champs persistants, tu dois quelque part avoir un truc du genre:

Code:

for I := 0 to IBQuery1.FieldCount do

au lieu de:

Code:

for I := 0 to IBQuery1.FieldCount - 1 do

Ce qui lève bien une exception EListError.
Etonné suis-je. :aie:
17/03/2011, 17h19
ShaiLeTroll

Normalement, un Query avec des Champs persistants ne doit pas changer de SQL, celui étant généralement défini dans l'IDE

Si tu veux un Query dynamique qui permet d'être utiliser pour n'importe quel SQL, il ne faut pas de champ persistant mais utilise FieldByName à la place !
Normalement, DefaultFields est à False, cela indique qu'il utilise des champs persistants ou des champs générés en fonction du recordset reçu !
Pour un Query dynamique, DefaultFields doit rester à True !

Evidemment, si tu déclares 21 champs persistants et que la requête ne renvoie que 11 champs, ça ne peut pas fonctionner !

setQyeryParams, qui doit être en vrai setQueryParams, est une fonction à toi ! cela fait quoi ?

Ce n'est pas l'erreur que tu ne comprends pas ! C'est plutôt l'utilisation des Champs persistants ! :aie:
17/03/2011, 17h39
jakouz

après recherche, il n'y a pas pas de boucle for avec FieldCount dans le code ...
17/03/2011, 17h57
Cl@udius

Tu fais forcément un accès à une liste en dehors ses bornes.
21 n'est peut-être qu'un hasard trompeur.

Pas de T[Object]List, TStringList, ou autres Items...
17/03/2011, 18h07
jakouz

je suis d'accord qu'il y a forcement un accès à une liste qq part, mais vu que ça plante sur l'instruction "Open" et pas après (en effet en mode débuggage F8 je ne vais pas à l'instruction suivante "First"), alors je ne vois pas où chercher
17/03/2011, 23h27
evarisnea

:salut:

et les propositions de Shai ? les as-tu explorées ?

Citation:

Envoyé par ShaiLeTroll

Normalement, un Query avec des Champs persistants ne doit pas changer de SQL, celui étant généralement défini dans l'IDE

Si tu veux un Query dynamique qui permet d'être utiliser pour n'importe quel SQL, il ne faut pas de champ persistant mais utilise FieldByName à la place !
Normalement, DefaultFields est à False, cela indique qu'il utilise des champs persistants ou des champs générés en fonction du recordset reçu !
Pour un Query dynamique, DefaultFields doit rester à True !

Evidemment, si tu déclares 21 champs persistants et que la requête ne renvoie que 11 champs, ça ne peut pas fonctionner !

setQyeryParams, qui doit être en vrai setQueryParams, est une fonction à toi ! cela fait quoi ?

Ce n'est pas l'erreur que tu ne comprends pas ! C'est plutôt l'utilisation des Champs persistants ! :aie:
18/03/2011, 08h29
jakouz

OK je vais explorer la proposition de ShaiLeTroll