Discussion :

[micoudic]

Bonjour,

Sur une forme, j'ai un DBGird. Quand je clique sur le titre d'une colonne, le fichier s'affiche trié sur le champ de la colonne.

Cela fonctionne bien depuis des années, mais maintenant j'obtiens le message «*Fonctionnalité non supportée*»

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
// --------------------------------------------------------------------
//  Selection critère de tri Grille Membres
// --------------------------------------------------------------------
procedure TSFM01.DBGrid1TitleClick(Column: TColumn);


begin
//  inherited;


  With SFMDM.Membres do
  Case Column.Index of

  0: begin   // N° Membre
       IndexName := 'KA_AKLE';
       WFieldName := 'A_AKLE';
       WInfoTri := 'N° de Membre';
       Label3.Caption := 'Recherche sur N° de Membre';
     end;

{  1: begin   // Statut (Radié)
     end; }

  2: begin   // Nom Prénom
       IndexName := 'KNOMKLE';
       WFieldName := 'ANOM';
       WInfoTri := 'Nom Prénom';
       Label3.Caption := 'Recherche sur Nom Prénom';
     end;

  3: begin   // Adresse 1
       IndexName := 'KAADR1';
       WFieldName := 'AADR1';
       WInfoTri := 'Adresse';
       Label3.Caption := 'Recherche sur Adresse';
     end;

... etc...

En mode debug pas à*pas, le plantage survient quand j'exécute la ligne "IndexName := "NOM_DE_LA_CLE" avec le message ci-dessous :

Le projet SFM.exe a provoqué une classe d'exception EDBEngineError avec le message 'Fonctionnalité non supportée.'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.

Ces clés (index) existent bien dans mon fichier.

Lorsque je compile avec les sources d'une vieille sauvegarde, cela fonctionne.

J'ai fait une comparaison des deux sources : Ils sont strictement identiques.
Je n'y comprends plus rien

[micoudic]

Petites précisions :

- je suis sous XP
- J'ai désinstallé-réinstallé D6

[SergioMaster]

Bonjour
n'y a t-il pas sous BDE/Paradox des restrictions quant aux noms de colonnes et indexs ?

[micoudic]

Ben... Mes fichiers sont au format dBase (.DBF, dans le titre)

Je ne vois pas pourquoi ça ne fonctionne plus alors que ça fonctionne avec la sauvegarde d'une ancienne version. Je ne vois vraiment plus où chercher.

[ShaiLeTroll]

Tu utilises bien les bons fichiers (ceux que tu as contrôlé ?), se tromper de fichier arrive vite si l'on utilise des alias
Les Fichiers NDX ou SDX sont présents ?
Les Index ne sont pas corrompus, ou même pire, absent ?

En DBF, IndexName ne supporte que des noms d'index existant !
Personne n'a touché à la base ?
Un admin ayant un outil comme DBase ProTools ayant repacker les fichiers pour le gain de place et ayant pu modifier la version des fichiers ?

As-tu vérifier les DFM des DataModules ? Des Options différents sur le composants TTable ?
La Définition des Index dans le TTable dans ce même DFM
On pense au code mais oas toujours au ressource

J'utilisais Apollo Engine pour DBase pour dépasser les limites du DBF supportés par le BDE (ayant des limitation comme la longueur de chaine à 255 caractères...)
Ce qui pose d'ailleurs des problèmes avec le Driver Base d'Excel qui ne comprend pas cela !

[micoudic]

Tu utilises bien les bons fichiers (ceux que tu as contrôlé ?), se tromper de fichier arrive vite si l'on utilise des alias
Les Fichiers NDX ou SDX sont présents ?
Les Index ne sont pas corrompus, ou même pire, absent ?

Oui, je pointe sur les mêmes fichiers (recompile à partir d'une vieille version, mais l'exe dans le même répertoire)
Par ailleurs, je n'utilise pas bdeadmin pour gérer l'alias : je le configure directement dans le code (pour compatibilité et utilisation de mon programme sous Linux)

En DBF, IndexName ne supporte que des noms d'index existant !
Personne n'a touché à la base ?
Un admin ayant un outil comme DBase ProTools ayant repacker les fichiers pour le gain de place et ayant pu modifier la version des fichiers ?

J'ai vérifié que mes index existent bien : d'une part, les fichiers .ndx et mdx existent, d'autre part, vérification avec le module de bases de données, pour vérifier la présence des index et aussi leur contenu (champs et conditions servant à créer l'index, pas l'index lui-même).
Pour la base elle-même, je suis seul à utiliser mon PC (chez moi) et accès protégé par mot de passe.

As-tu vérifier les DFM des DataModules ? Des Options différents sur le composants TTable ?
La Définition des Index dans le TTable dans ce même DFM
On pense au code mais oas toujours au ressource

J'ai vérifié à partir de l'inspecteur d'objets, mais je peux avoir sauté quelque chose.
Coté DM, j'ai regardé également, mais je n'ai rien trouvé.

Je vais passer à la moulinette tous les fichier .pas et .dfm pour comparaison.
J'espère trouver quelque chose.

Je ne conaissait pas Apollo Engine. Je regarderai de ce coté.

Merci.

[micoudic]

Bonjour,

J'ai passé à la moulinette les fichiers .pas et .dfm : je n'ai rien trouvé.
J'ai supprimé la table qui pose problème et je l'ai replacé : toujours pareil.
Je me demande si je ne devrais pas tenter la même opération avec la grille ?

Je ne pense pas que cela vienne du BDE. En effet, en plus du programme "ancienne version" qui fonctionne bien, j'ai également un programme qui est la copie de celui qui pose problème, mais en version "bridée" CAD en lecture seule, et lui aussi fonctionne bien.

Y a-t-il une piste que je devrais explorer ?

[micoudic]

Bon, ca fonctionne.
Ne me demandez pas pourquoi, je n'en sais malheureusement strictement rien
Je suis reparti d'une ancienne sauvegarde et le problème a disparu. Mystère...
J'aurai pourtant bien aimé comprendre ce qui s'est passé.

PS : Je voulais mettre "Resolu" dans le titre, mais je n'ai pas la main pour le modifier.