Hi,
es ist nur eine Tabelle und eine Indexdatei. Bei einer Sicherung der Daten wird der gesamte Ordner (inklusive *.adi und *.adt)
gespeichert. Dieser wird dann beim Backup zurück kopiert bzw. ersetzt. Sonst passiert mit dem Index nur folgendes:
Delphi-Quellcode:
oncreate:
ADSTable1.IndexName := 'NAME';
gridclick:
if (ARow = 0) and (ACol = 1) then ADSTable1.IndexName := 'NAME';
if (ARow = 0) and (ACol = 2) then ADSTable1.IndexName := 'VORNAME';
if (ARow = 0) and (ACol = 3) then ADSTable1.IndexName := 'STRASSE';
if (ARow = 0) and (ACol = 5) then ADSTable1.IndexName := 'PLZ';
if (ARow = 0) and (ACol = 6) then ADSTable1.IndexName := 'WOHNORT';
if (ARow = 0) and (ACol = 11) then ADSTable1.IndexName := 'DEFINIERBAR';
if (ARow = 0) and (ACol = 15) then ADSTable1.IndexName := 'GRUPPE';
Backup zurückspielen:
if (copyfile(PChar(pfad +'\adressen.adi'),PChar((ExtractFilePath(ParamStr(0))+ '\daten\adressen.adi')),false)= true) and
(copyfile(PChar(pfad +'\adressen.adt'),PChar((ExtractFilePath(ParamStr(0))+ '\daten\adressen.adt')),false)= true) then
begin
end else
begin
AdsConnection1.IsConnected := true;
AdsTable1.Active := true;
Statusbar1.Panels.Items[1].Text := IntToStr(ADSTable1.recordcount);
MessageDlg(' Fehler bei der Wiederherstellung der Datenbank! ',mtError,[mbOK],0);
end;
Allerdings werden die Dateien beim Backup ja
komplett ersetzt. Kann es da dann wirklich zu dem Fehler kommen?
Viele Grüße...