Indexation d'une table paradox

Signaler
Messages postés
3
Date d'inscription
mercredi 3 décembre 2014
Statut
Membre
Dernière intervention
10 décembre 2014
-
Messages postés
14
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
23 juin 2021
-
comment indexer une table paradox par programme

4 réponses

Messages postés
675
Date d'inscription
jeudi 17 avril 2008
Statut
Membre
Dernière intervention
19 février 2019
13
Bonjour (ça ne mange pas de pain !)
tu fais google "comment indexer une table paradox par programme en delphi 7"
et tu as plein de réponses !
Messages postés
3
Date d'inscription
mercredi 3 décembre 2014
Statut
Membre
Dernière intervention
10 décembre 2014

j'insiste
Messages postés
1284
Date d'inscription
mardi 28 octobre 2003
Statut
Contributeur
Dernière intervention
3 juillet 2015
13
Bonjour,

Que voulez vous faire ?
Une clé primaire ? Un index de tri ?
Messages postés
3
Date d'inscription
mercredi 3 décembre 2014
Statut
Membre
Dernière intervention
10 décembre 2014

une clé primaire
Messages postés
1284
Date d'inscription
mardi 28 octobre 2003
Statut
Contributeur
Dernière intervention
3 juillet 2015
13
Etrange... Ce code devrait en théorie pouvoir ajouter une clé primaire à une table, mais chez moi, Paradox m'indique qu'il s'agit d'une fonctionnalité non supportée...
// Création dynamique d'un composant TQuery qui va permettre 
// d'intervenir sur la table de la base de donnée
With TQuery.Create(nil) do begin
    DatabaseName := [Répertoire contenant le fichier de la table à modifier];
    With SQL do begin
        // Composition de la requête qui va permettre de créer la clé primaire
        Add('Alter table [Nom du fichier correspondant à la table à modifier]');
        Add('Add primary key ([Nom du champ ou Nom des champs séparés par des virgules de la table composant la clé primaire]);');
    end;
    try
        // Exécution de la requête
        ExecSQL;
    Except
        // Gestion des erreurs
        on e : Exception 
           do ShowMessage(e.Message);
    end;
    // Nettoyage de la mémoire
    Free;
end;


En revanche, il est possible de créer une table dynamiquement avec une clé primaire comme dans l'exemple ci-dessous :
// Création dynamique d'un composant TQuery qui va permettre d'intervenir sur la base de donnée
With TQuery.Create(nil) do begin
    DatabaseName := [Répertoire contenant le fichier de la table à modifier];
    With SQL do begin
        // Composition de la requête qui va permettre de créer la table avec la clé primaire
        Add('Create table test_index');
        Add('(');
        Add('Champ1 integer,');
        Add('Champ2 integer,');
        Add('primary key (Champ1)');
        Add(');');
    end;
    try
        // Exécution de la requête
        ExecSQL;
    Except
        // Gestion des erreurs
        on e : Exception 
           do ShowMessage(e.Message);
    end;
    // Nettoyage de la mémoire
    Free;
end;

Messages postés
14
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
23 juin 2021

comment indexer une base de données dbf déjà créer par dbu de clipper5.3 et que j'utilise maintenant pour delphi7 pour le langage clipper c est très simple use etudiant ( ouvrire la base ) index on nom+prenom to etude ( indexer la base sur non prenom et donner le nom du fichier index qui est etude )