Discussion :

[zax-tfh]

Bonjour,

Je regarde actuellement pour vider une table paradox. J'ai bien regardé sur le site, forums... et j'ai vu deux methodes. Dont une que j'avais deja utilisé.
Donc par rapport a ces deux methodes il y en a une qui utilise le SQL, ce qui ne m'interresse pas vraiment et une qui utilise le EMPTYTABLE ca ca m'interresse !

Donc voila ce que je fais :
J'ai une composant TTable qui s'appelle teintes, placé sur ma Form. Ensuite j'ai un composant TDatasource qui s'appelle DSTeintes.
Enfin j'ai un DBGrid et un bouton.
Dans la methode de mon bouton je met ce code ci :

Code :

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

1
2
teintes.Active:=false;
teintes.EmptyTable;

Le probleme que je rencontre est simple mais je ne comprend pas pourquoi :
Lorsque je clicke sur le bouton il me met : la table est occupée

Comment faire pour eviter ce message svp ?
Merci d'avance !
@++

[Amenofis]

Salut,

comment éviter le problème ?? je n'en sais rien... à priori cela vient du fait que la table est occupée par ailleurs, mais où, faudrait voir la totalité de la source pour cela... et encore...

essaye ces quelques lignes

Code :

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

1
2
3
4
5
6
7
8
9
 
With Teintes do
   begin
   Active:=true;
   First;
   if RecordCount<>0
      then repeat Delete until EOF;
   Active:=false;
   end;

Si tu as toujours ton erreur c'est que ta table est réellement occupée ailleurs... et que donc cela ne vient pas du EmptyTable

Attention toutefois : cette opération ne supprime pas les enregistrements (EmptyTable non plus d'ailleurs) mais les rend non accessibles... la taille de ta table sera donc inchangée... jusqu'à son compactage éventuel...

@+

[bNoureddine]

Bonjour,

Je regarde actuellement pour vider une table paradox. J'ai bien regardé sur le site, forums... et j'ai vu deux methodes. Dont une que j'avais deja utilisé.
Donc par rapport a ces deux methodes il y en a une qui utilise le SQL, ce qui ne m'interresse pas vraiment et une qui utilise le EMPTYTABLE ca ca m'interresse !

Donc voila ce que je fais :
J'ai une composant TTable qui s'appelle teintes, placé sur ma Form. Ensuite j'ai un composant TDatasource qui s'appelle DSTeintes.
Enfin j'ai un DBGrid et un bouton.
Dans la methode de mon bouton je met ce code ci :

Code :

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

1
2
teintes.Active:=false;
teintes.EmptyTable;

Le probleme que je rencontre est simple mais je ne comprend pas pourquoi :
Lorsque je clicke sur le bouton il me met : la table est occupée

Comment faire pour eviter ce message svp ?
Merci d'avance !
@++

Essaye cela ton code :

teintes.close;
teintes.open;
teintes.EmptyTable;

[Nono40]

Attention : supprimer tous les enregistrements n'est pas faire un emptytable. Supprimer tous les enregistrements ne réduit pas la taille du fichier DB.

Si l'a table est occupée, c'est simplement qu'elle est déjà ouverte ailleurs ( regarde dans l'IDE Delphi, le module BDD etc... )