Wie löscht man den Index einer Datenbank ?

[Hercules]

Hallo erst mal an alle!
Ich habe in der folgenden Prozedur den Inhalt einer Datenbank gelöscht:

Code: Alles auswählen

procedure TForm1.Button1Click(Sender: TObject);
begin
  Dbf1.First;
  While NOT Dbf1.EOF DO Dbf1.Delete;
end;

Das hat zwar funktioniert, wenn ich aber wieder neue Sätze einfüge, dann
zählt der Index weiter, hier im Beispiel ID = 30. Ich würde aber gern wieder mit 0 anfangen.
Kann mir da jemand helfen ?
Gruß Hercules, und allen ein frohes Weihnachtsfest und einen guten Rutsch!

[MmVisual]

TRUNCATE

http://dev.mysql.com/doc/refman/5.1/de/truncate.html

DROP TABLE und neu machen

[Hercules]

Hallo MyVisual, ich glaub den Befehl gibt es bei DBASE nicht
Oder hab ich da was falsch verstanden ?

[am2]

Hallo erst mal an alle!
Ich habe in der folgenden Prozedur den Inhalt einer Datenbank gelöscht:

procedure TForm1.Button1Click(Sender: TObject);
begin
Dbf1.First;
While NOT Dbf1.EOF DO Dbf1.Delete;
end;

Das hat zwar funktioniert, wenn ich aber wieder neue Sätze einfüge, dann
zählt der Index weiter, hier im Beispiel ID = 30. Ich würde aber gern wieder mit 0 anfangen.
Kann mir da jemand helfen ?
Gruß Hercules, und allen ein frohes Weihnachtsfest und einen guten Rutsch!

Tut mir leid, aber ich fürchte, Du bist auf dem Holzweg.
1. Normalerweise bleiben IDs, man fängt (außer zu Testzwecken) nicht wieder von vorn an. Hintergrund: ID steht für identitifizieren. Sollte irgendwo extern noch ein solcher Datensatz rumdümpeln, dann hast Du ein Problem (angenommen, jemand hat sich die Tabelle gestern ausgedruckt, Meier hat die ID 3. Du löscht heute die Daten, fängst vorn an und jetzt bekommt Müller die 3. Morgen bekommst Du einen Anruf, was denn los sei: Wieso bekommt Meier plötzlich 10000€ Gehalt und Müller nur noch 500€. Wenn die 3 nicht mehr existiert, dann weißt Du sofort: Moment mal, ich habe hier gar keinen mit der ID 3.

2. Es hängt sehr vom Datenbanksystem ab, wie diese fortlaufenden Zahlen erzeugt werden. Oracle beispielsweise sieht vor, dass Sequenzen benutzt werden. Du fragst also eine Sequenz ab und erhältst einen Wert. Dieser Wert wird (typischerweise) von dieser Sequenz nie wieder verwendet, egal, ob Du letztlich einen Datensatz anlegst, oder nicht. Um diese Sequenz von vorn loslaufen zu lassen, könntest Du sie löschen und neu bauen. Wie es andere DB- Systeme (insbesondere das von Dir verwendete) handhaben, weiß ich nicht.

3. Im Normalfall sind Datenbanken Multi- User- Systeme. Wenn ein Programm sagt, dass es eine neue Nummer haben will, diese aber erst ein paar Sekunden später in einen Datensatz einfügt, ein anderes widerum beschließt, in der Zwischenzeit die Daten zu löschen und den Zähler von vorn anfangen zu lassen, dann kann es leicht passieren, dass das erste Programm seinen Datensatz mit der ID 30 in eine frisch gelöschte Datenbank schreibt, der Zähler aber wieder vorn beginnt. Irgendwann wird dann vermutlich auch die 30 erreicht werden und das System meldet einen Konflikt, den sich keiner mehr erklären kann.

Also wahrscheinlich läßt sich Deine Frage nicht zufriedenstellend beantworten, es sei denn, Du schilderst ein Szenario, bei dem es auf das eine oder andere Problem nicht ankommt.

Andreas

[baba]

procedure TForm1.Button1Click(Sender: TObject);
begin
Dbf1.First;
While NOT Dbf1.EOF DO Dbf1.Delete;
end;

Ganz einfach ...

Code: Alles auswählen

procedure TForm1.Button1Click(Sender: TObject);
begin
  Dbf1.Zap;
end;

Baba.

[shokwave]

procedure TForm1.Button1Click(Sender: TObject);
begin
Dbf1.First;
While NOT Dbf1.EOF DO Dbf1.Delete;
end;

Damit werden die einzelnen Datensätze als gelöscht markiert, aber nicht gelöscht. Um die als gelöscht markierten Datensätze zu entfernen gibt es DBF1.PackTable. Welche Risiken das birgt, wurde schon erklärt.

Der Index(die Sortierereihenfolge) von Dbf-Dateien stehen in einer separaten Datei mit gleichen Name wie die Dbf, aber anderer Endung (z.B.: .mdx). Du müsstest nur die Datei löschen und den Index neu aufbauen.

[af0815]

Der Index(die Sortierereihenfolge) von Dbf-Dateien stehen in einer separaten Datei mit gleichen Name wie die Dbf, aber anderer Endung (z.B.: .mdx). Du müsstest nur die Datei löschen und den Index neu aufbauen.

Ich glaube, er will nicht den Indes neu aufbauen, sondern die automatische Nummerierung (Generator) zurücksetzen.

[Hercules]

Hallo und schönen guten Tag an Alle.
Mir ist schon klar, was das für Auswirkungen hat, wenn ich den Index löschen würde.
Da hast Du schon recht, Andreas. Eigentlich will ich das Ganze ja nur verstehen.
Noch bin ich ja am testen, sonst macht man ja sowas sicher nicht.
Danke auch an baba, shokwave, MmVisual und af0815 für Eure Hilfe.
Sollten wir uns nicht mehr lesen, dann wünsche ich Euch allen und allen Anderen ein schönes,
besinnliches und ruhiges Weihnachsfest, alles Gute für 2011 und rutscht gut rein
in das Neue Jahr.
Hercules.

[af0815]

Noch bin ich ja am testen, sonst macht man ja sowas sicher nicht.

Ich scripte mir für das die Datenbank und Testdaten oder spiele für den Versuch ein Backup ein und mache die Versuche. Bei der zweiten Methode sieht man auch ob das Backup/Restore zuverlässig funktioniert.