Datenbank

Für alles, was in den übrigen Lazarusthemen keinen Platz, aber mit Lazarus zutun hat.
Michl
Beiträge: 2505
Registriert: Di 19. Jun 2012, 12:54

Re: Datenbank

Beitrag von Michl »

Ein "Speichern unter" ist bei Datenbanken (IMHO auch bei TDbf dito) nicht vorgesehen/gewollt (außer als Backup/Spiegelung). Da dies bei dir nur eine Datei ist, könntest du sie, wenn es unbedingt sein muss, einfach an die gewünschte Stelle kopieren.

Code: Alles auswählen

type
  TLiveSelection = (lsMoney, lsChilds, lsTime);
  TLive = Array[0..1] of TLiveSelection; 

Nugi89
Beiträge: 68
Registriert: Do 26. Feb 2015, 13:46

Re: Datenbank

Beitrag von Nugi89 »

hab auch schon mitbekomm :cry:
hab jetzt was anderes vor will mir die fertigen daten nur in eine dbgrid schreiben. und diese dann irgendwie speichern.
tja und da scheiterst es. :roll:
hab was datenbanken angeht noch nicht alles so raus.

Michl
Beiträge: 2505
Registriert: Di 19. Jun 2012, 12:54

Re: Datenbank

Beitrag von Michl »

Nugi89 hat geschrieben:hab jetzt was anderes vor will mir die fertigen daten nur in eine dbgrid schreiben. und diese dann irgendwie speichern.
Das kannst du zwar machen, meine Aussage hast du aber wahrscheinlich nicht verstanden.

Ich meinte das in etwa so (ohne Fehlerbehandlungen etc.):

Code: Alles auswählen

uses ..., FileUtil;
...
  if SaveDialog1.Execute then
  begin
    Dbf1.Close;
    CopyFile(Dbf1.TableName, SaveDialog1.FileName);
    Dbf1.TableName:=SaveDialog1.FileName//oder diese Zeile raus, wenn du die bisherige Datenbank weiter nutzen willst
    Dbf1.Open;
  end;

Code: Alles auswählen

type
  TLiveSelection = (lsMoney, lsChilds, lsTime);
  TLive = Array[0..1] of TLiveSelection; 

Antworten