vider table + index primaire
Salut à tous,
Je suis entrain de réaliser une application ou j'ai besoin de vider une table , g tt essayé avec emptytable mais sans résultat, apres quelques recherches j'ai choisi d'utiliser le code suivant
Code:
1
2
3
4
5
6
7
8
9
10
| With Table1 do
begin
if RecordCount<>0
then repeat Delete until EOF;
active:=false;
end; |
mais g encore deux problemes:
1.La taille ne se modifie pas apres vidage -on a dit meme que emptytable ne le fait pas-et j'aimerai bien savoir comment le faire pour ne pas avoir une base de taille tjs croissante!
2.Sachant que la base est crée avec database desktop fourni avec delphi 7, J'ai un champ de type '+' (autoincrementation) et j'aimerai que lorsque je vide ma table le compteur de ce champs s'initialise en 0.
merci pour votre aide.
