Effacer tout les champs d'une table

Bonjour , j ai un petit probleme pour effacer tout les champs d'une table apres le clique d'un bouton

Code:

---

1 2 3 4 5 6 7 8

void __fastcall TForm5::Button4Click(TObject *Sender) { SQLQuery1->Active=false; SQLQuery1->SQL->Clear(); SQLQuery1->SQL->Add("TRUNCATE TABLE `paniercommande`"); SQLQuery1->Active=true; }

---

Exception déclenchée à $7C812A5B. Classe d'exception EDatabaseError avec message 'SQLQuery1: Curseur non renvoyé par Query'. Processus Project1.exe (2068)

tu veux vider toute la table ou la supprimer ?

DROP TABLE "nom de table" ; efface la table

TRUNCATE TABLE "nom de table" ; efface le contenu de la table

DELETE FROM "nom de table" WHERE {condition}

efface un enregistrement de la table

SQLQuery1->Active=false;
SQLQuery1->SQL->Clear();
SQLQuery1->SQL->Add("TRUNCATE TABLE `paniercommande`");

ESSAYE AVEC EXECSQL

SQLQuery1->ExecSql();


@+:bug: