Discussion :

[spirale]

Bonjour,

Soit une table T sous MS-ACCESS contenant 3 champs :
- une clé primaire ID1
- une clé secondaire ID2
- un champs texte VAL

Et 4 enregistrements dans cette table :
(1,1,'a') (2,1,'b') (3,2,'a') (4,2,'b')

Un composant TADOTable MonADOTable est connecté à cette table et applique un filtre ID2 = 2.

L'opération MonADOTable.Locate ('VAL', 'b', [loCaseInsensitive]) réussit (Result = True) mais me déplace mon curseur sur le troisième enregistrement et non le quatrième.

Inituitivement je ne parviens pas à comprendre ce comportement.

NOTA : je contrôle le déplacement du curseur par :

showmessage(IntToStr(MonADOTable.RecNo))

et

showmessage(MonADOTable.FieldByName('VAL').AsString)


En espérant avoir été suffisament clair dans la description de mon problème

[Nathan]

Salut,
A tu essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonADOTable.Locate('ID2;VAL',VarArrayOf(['2','b']),[loCaseInsensitive]);

@+

[Rayek]

Peut être parce que RecNo commence à 0 au lieu de 1 donc tu as un décalage de 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
RecNo --- ID1 --- ID2 --- VAL
0     --- 1   --- 1   --- a
1     --- 2   --- 1   --- b
2     --- 3   --- 2   --- a
3     --- 4   --- 2   --- b

[spirale]

Salut,
A tu essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonADOTable.Locate('ID2;VAL',VarArrayOf(['2','b']),[loCaseInsensitive]);

@+

Effectivement, cela fonctionne bien mais je ne saisis pas la nécessité de préciser ID2 dans la mesure où la table est déjà filtrée selon ce paramètre.

[spirale]

Peut être parce que RecNo commence à 0 au lieu de 1 donc tu as un décalage de 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
RecNo --- ID1 --- ID2 --- VAL
0     --- 1   --- 1   --- a
1     --- 2   --- 1   --- b
2     --- 3   --- 2   --- a
3     --- 4   --- 2   --- b

Quel que soit le nombre d'enregistrements mon opération Locate me conduit toujours à RecNo = 1

[Rayek]

Parce que ta table est filtrée, tu n'as plus que 2 enregistrements :

Table avec filtre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
RecNo --- ID1 --- ID2 --- VAL
0     --- 3   --- 2   --- a
1     --- 4   --- 2   --- b

[Nathan]

En fait je te dit ca parce que a mon avis c'est plus propre d'utiliser une seule des deux options (Filter ou Locate).
Ma préférée est Locate.
A toi de voir.
@+

[spirale]

Parce que ta table est filtrée, tu n'as plus que 2 enregistrements :

Table avec filtre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
RecNo --- ID1 --- ID2 --- VAL
0     --- 3   --- 2   --- a
1     --- 4   --- 2   --- b

Non, parce que même si j'ai après filtrage :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
RecNo --- ID1 --- ID2 --- VAL
0     --- 3   --- 2   --- a
1     --- 4   --- 2   --- b
1     --- 4   --- 2   --- c
1     --- 4   --- 2   --- d

[/quote]

un Locate a, b , c ou d me renvoie toujours sur RecNo = 1 ie a
C'est à n'y rien comprendre.

[Rayek]

Quel version de delphi tu as ?

[spirale]

En résumé, dans le cas suivant :

ID1 - ID2 - Valeur
1 - 1 - a
2 - 1 - b
3 - 2 - a
4 - 2 - b

Filter := 'ID2 = 2';
Locate(Valeur, 'b', [loCaseInsensitive]);

Cette instruction localise la première occurence 'b' du jeu d'enregistrements global (quel que soit le filtrage appliqué).
Dans ce cas, elle trouve l"enregistrement ID1 = 2, elle essaye de déplacer le curseur sur lui.
Ce dernier ne faisant pas partie du jeu des données filtrées, l'opération échoue.

Au contraire, avec le jeu :

ID1 - ID2 - Valeur
1 - 1 - a
2 - 1 - a
3 - 2 - a
4 - 2 - b

L'instruction Locate fonctionne correctement.

Etrange comportement n'est ce pas ?

Ne puis-je pas imposer un filtrage lors de l'opération Locate ?

[spirale]

Quel version de delphi tu as ?

Borland Visual Studio 9.0.1761.24408

Rq : tu as raison de me demander ma version car je viens de tomber sur un forum de discussion évoquant ce problème sur le composant dbGo en 2001, mais j'imagine que le problème a du être résolu depuis.

[Rayek]

Je crois que les composants AdoTable de D2005 sont bugs (j'ai D2005 mais j'utilise jamais de AdoTable)