Vokabelprogramm

[Sir Rufo]

Hier mal eine Minimal-DB mit Ini-Dateien

Die Ini-Datei wie folgt aufbauen:

Code:

[deutsch-englisch]
gehen=go
ich gehe=i go

[englisch-deutsch]
go=gehen
i go=ich gehe

Abrufen der Vokabeln:

Delphi-Quellcode:

uses IniFiles;

...

function GetTranslation( Vokabel, Richtung : string ) : string;
var
  VokabelDatei : TIniFile;
begin
  VokabelDatei := TIniFile.Create( 'MeineVokabeln.ini' );
  try
    Result := ReadString( Richtung, Vokabel, '' );
  finally
    VokabelDatei.Free;
  end;
end;

So erfolgt dann z.B. der Zugriff:

Delphi-Quellcode:

  ...
Memo1.Lines.Add( 'go => ' + GetTranslation( 'go', 'englisch-deutsch' ) );
// oder auch andersrum
Memo1.Lines.Add( 'gehen => ' + GetTranslation( 'gehen', 'deutsch-englisch' ) );
...

Alles weitere TIniFiles

Hinweis: Für größere Speichermengen/Daten ist das natürlich nicht zu empfehlen, aber für eine kleine Anwendung dieser Art auf jeden Fall ausreichend.

cu

Oliver