Wie kann ich mit Delphi Daten(mengen) speichern?

[Zooel]

Bei dem Programm, dass ich schreiben möchte handelt es sich um eine Art Organizer, der in der Lage ist diverse Daten zu speichern. Leider kenne ich mich mit den Speicherbefehlen nicht genügend aus um diese Problematik zu bewältigen. Mir wurde von Bekannten ans Herz gelegt, dass ich mit Datenbanken arbeiten sollte. Nun steh ich allerdings vor der Frage wie ich dies implementiere. Diese Frage würde ich gerne an euch weiterreichen!

Es würde mich freuen wenn ihr mir unter die Arme greifen könntet, da es sich bei diesem Programm um eines handelt, welches elementaren Einfluss auf meine Abinote hat.

Danke!

[Dax]

Wenn es nur um einen kleinen Organizer geht, würde ich nicht direkt mit SQL oder Paradox oder so arbeiten sondern eher eine .ini-datei bevorzugen.

z.B.:

Code:

[Inhalte]
Zahl=2
Inhalt1=Wohnort
Inhalt2=Telefon

[User]
Zahl=3
User1=Daniel
User2=sakura
User3=Zooel

[User1]
Wohnort=woanders
Telefon=nochnichterfunden

[User2]
...

[User3]
...

Beispielcode zur verwendung:

Delphi-Quellcode:

uses inifiles;

{...}

procedure ausgabe;
var 
  s: string;
  inhalte, user: array of string;
  i: inifile;
  int, e: integer;
begin 
  i := TIniFile.Create(SpeicherOrtDerDatei);
  int := i.ReadInteger('Inhalte', 'Zahl', 0);
  SetLength(inahlte, int+1);
  for int := 1 to int do
    inhalte[int] := i.ReadString('Inhalte', 'Inhalt' + IntToStr(int), '');
  int := i.readInteger('User', 'Zahl', 0);
  for int := 1 to int do
    user[i] := i.ReadString('User', 'User' + IntToStr(int), '');
  
  for int := 1 to Length(User)-1 do
  begin
    for e := 1 to length(inhalte)-1 do
      WriteLN(inahlte[e] + ' von ' + user[int] + ': ' + i.ReadString('User' + IntToStr(int), inhalte[e], '');
  end;  
end;

BtW: Der Code ist gerade "On-The-Fly" entstande, also nicht getestet!

Und: Wenn du es so schreibst, musst du es als Konsolenanwendung kompilieren.

[MrKnogge]

Je nach Datenmenge macht eine Datenbank sinn,
bei 2-3 Errinnerungen find ich so etws schwachsinn,
zumahl du selbst sagst, dass du dich mit normalen
Speicherroutinen nicht auskennst.

Schau mal bei www.delphi-source.de vorbei,
die Tutorials zu "Streams" und "Typisierte Dateien"
sind wohl genau das was du suchst !

[Dax]

"Offene Frage"???