Vider une base de données

Résolu
fifisoum5 Messages postés 22 Statut Membre -  
flashdkDog Messages postés 1 Statut Membre -
slt tout le monde je veux vider ma base
j'ai trouvé dans un groupe
if MessageDlg('La table " FOURNISSEUR " va être vidée. Toutes les données vont être perdues. Voulez-vous continuer ?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
TableFour.Close;
TableFour.EmptyTable;
mais malheureusement j'ai pas trouvé dans mon delphi ''emptytable" que dois je faire svp

2 réponses

Célien Messages postés 6010 Statut Membre 1 993
 
Salut,

Tu travailles avec quel format de base de données ? Tu sais que que à partir de Delphi tu peu programmer en SQL ? Si tu est sérieux sur le développement d'applications base de données en Delphi tu sera plus efficace si tu connais SQL. Si tu ne connais pas encore SQL : Cours SQL.
0
solilog Messages postés 273 Statut Membre 2
 
Bonjour,
Vérifie que tu as bien dans ton unité:
uses ..., ..., Db, DBTables, ...;
emptytable est dans l'unité DbTables, to DOIS la trouver :-)
Bonne chance.
solilog
0
fifisoum5 Messages postés 22 Statut Membre
 
:/ comme j'utilise delphi xe3 la fonction emptytable n'existe pas
mais j'ai trouvé ce code et il a tout vidé
if messagedlg
('La table " Patient" va être vidée. Toutes les données vont être perdues. Voulez-vous continuer ?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes then

with datamodule2.ADOPatient do
begin

try
first;
while not eof do
begin
datamodule2.ADOPatient.Delete;
end;
finally

end;
0
flashdkDog Messages postés 1 Statut Membre > fifisoum5 Messages postés 22 Statut Membre
 
Bjr moi je te conseille d'utiliser une requette preparée dont le Querry conteindra
DELECT * FROM la table.
Dans delphi tu fais : le Querry.unprepare;
tu passes en parametre le nom de la table au Querry puis
le Querry .execsql
0