Welche DB soll ich verwenden ?

[Thomas F]

Ich brauche eine kleine Datenbank (wenig MB) , da ich nur eine kleine Tabelle erstellen will.
Eine reine Textdatei möchte ich aber nicht, weil dann die Daten sofort sichtbar sind.
Möglichst ohne BDE ,und möglichst schlank, weil die Tabelle nur maximal ein paar hundert Einträge haben soll.
Außerdem soll es keine Lizenz-Probleme geben, wenn man das ganze veröffentlicht.
Wer kann mir einen Tip geben ?
Vielleicht dBase ?

[OG Karotte]

SQLite:

• Schlank (nur eine DLL wird benötigt)
• schnell,
• Lizenzfrei (PD)
• Keine Installation notwendig

Zugriff kann z.B. über ZEOS oder über DISQLite erfolgen.

[Thomas F]

Zitat:

Zitat von OG Karotte

SQLite:

• Schlank (nur eine DLL wird benötigt)
• schnell,
• Lizenzfrei (PD)
• Keine Installation notwendig

Zugriff kann z.B. über ZEOS oder über DISQLite erfolgen.

Ja Danke

Ich probiers aus !

[Mavarik]

Bist Du sicher, dass Du überhaupt eine Datenbank brauchst?

Vielleicht bietet es sich an, einfach die Daten hintereinander zu speichern und ggf. eine Key mit Seeknummer...

Mavarik :coder:

[Thomas F]

Zitat:

Zitat von Mavarik

Bist Du sicher, dass Du überhaupt eine Datenbank brauchst?

Vielleicht bietet es sich an, einfach die Daten hintereinander zu speichern und ggf. eine Key mit Seeknummer...

Mavarik :coder:

Nee, weiß ich nicht

Soll aber nicht zu kompliziert werden, bin noch Anfänger

Wie schauts mit dBase aus , braucht man da BDE ?

Ich hab gelesen, dass dbase auch ohne BDE funktioniert

[Jelly]

Finger weg von DBase, das stammt aus der Steinzeit... :zwinker:

Nutze bitte mal die Forensuche. Die Frage nach einer geeigneten Datenbank hatten wir hier schon 1000 mal.

[TUX_der_Pinguin]

Also wenn es nur um wenige Datensätze geht könntest du das ganze evtl. auch als 'Stream' speichern,
das Speichern und Laden geht recht flott. Texte sind zwar theoretisch lesbar in solch einer Datei
aber ziemlich durcheinander, wenn du diese Datei mal im Editor öffnest.

[Thomas F]

Zitat:

Zitat von TUX_der_Pinguin

Also wenn es nur um wenige Datensätze geht könntest du das ganze evtl. auch als 'Stream' speichern,
das Speichern und Laden geht recht flott. Texte sind zwar theoretisch lesbar in solch einer Datei
aber ziemlich durcheinander, wenn du diese Datei mal im Editor öffnest.

Ich hab in meinem Buch ein Beispiel dazu gefunden
"Variablenwerte in einem FileStream abspeichern"
Das könnte ich probieren
Da brauch ich ne StringGrid keine DBGrid, weil es keine richtige Datenbank ist, oder ?

[Mavarik]

Oder... und Schneller geht es nicht... (Wofür war die 713) ?

Delphi-Quellcode:

type

  Str6  = String[6];
  Str20 = String[20];
  Str60 = String[60];
  Str80 = String[80];

  TCooledaten = record
                  Nachname  : Str80;
                  Vorname   : Str80;
                  Strasse   : Str80;
                  PLZ       : Str6;
                  Ort       : Str60;
                  frei      : array[1..713] of byte; // Denksportaufgabe woher kommt die 713?
                end;

  TCoolerIDX  = record
                  Nachname  : Str20;
                  SeekNr    : longint;
                end;

  TAlleDaten = array[0..1023] of TCooledaten;
  TAlleIDX   = array[0..1023] of TCoolerIDX;
var

  fd_dat    : file of TCooledaten;
  fd_dat2   : file of TAlledaten;

  fd_idx    : file of TCoolerIDX;
  fd_idx2   : file of TCoolerIDX;

  Path      : array[0..Max_Path] of char;
  Cooldaten : TCooledaten;
  CoolIDX   : TCoolerIDX;
  AlleDaten : TAlleDaten;
  AlleIDX   : TAlleIDX;
  i         : integer;
  
begin
  SHGetFolderPath(0,CSIDL_PERSONAL,1,0,@Path[0]); // Vista!

  if {Alles im Speicher}
    then begin
           Assignfile(fd_dat2,Path+'\Meinprogramm\Daten\Coolbase.dat');
           Assignfile(fd_idx2,Path+'\Meinprogramm\Daten\Coolbase.idx');
         end;
    else begin
           Assignfile(fd_dat,Path+'\Meinprogramm\Daten\Coolbase.dat');
           Assignfile(fd_idx,Path+'\Meinprogramm\Daten\Coolbase.idx');
         end;

  {$I- }
  reset(fd_dat);

  if IOResult <> 0 then
    Rewrite(fd_dat);
  {$I+}

  if {Alles im Speicher}
    then begin
           Blockwrite(fd_Dat2,AlleDaten);
           Blockwrite(fd_idx2,AlleIDX);
         end
    else begin
           for i:=0 to 1023 do
             begin
               Blockwrite(fd_dat,Cooldaten);

               CoolIDX.Name := copy(Cooldaten,1,20);
               CoolIDX.SeekNr := i;

               Blockwrite(fd_idx,Coolidx);
             end;
         end;

  Closefile(fd_dat);
  Closefile(fd_IDX);

[Thomas F]

Ihr habt Recht, ich mach das ohne Datenbank
Soll nur ne kleine Tabelle werden, da brauch ich keine Datenbank