Alle Datensätze löschen

[Christian18]

Hallo,

ich habe eine Paradox7 Tabelle und wollte alle Datensätze löschen. Also ich möchte eine Rouitine schreiben wie ich alle Datensatze löschen kann! Wie mache ich das???

[Christian18]

ich hatte auch schon einmal angefangen:

Delphi-Quellcode:

  //Alle Datenbank einträge aus löschen (Idealgewicht.db)

  Min := 0;
  Max := DM.TIdealgewicht.RecordCount;
  DM.TIdealgewicht.First;
    for i := 0 to Max do
      begin
        DM.TIdealgewicht.Delete;
        DM.TIdealgewicht.Next;
      end;

kommt aber leider ein fehler und zwar "TIdealgewicht: Operation bei leerer Datenmenge nicht ausführbar."


warum kommt das???


Vielen Dank schon einmal im vorraus!

[fiasko]

Weil du 1x zuviel löschst. Ich würde ein while Konstrukt bevorzugen:

Delphi-Quellcode:

  DM.TIdealgewicht.First
  while DM.TIdealgewicht.RecordCount>0 do
   DM.TIdealgewicht.Delete;

kA ob das so geht... meine Paradox Zeiten sind schon lange vorbei. Ich würde denken es gibt da auch eine Methode die sowas macht.

[Sharky]

Hai Christian,

mache es doch über ein SQL-Query.
DELETE FROM tabelle

[r_kerber]

Oder mit TTable.EmptyTable!