Internationalisierung

[Baeuerle]

Hallo zusammen,

ich möchte meine Anwendung in verschiedene Sprachen übersetzten und habe mir folgende Vorgehensweise überlegt.

Pro Sprache wird eine Datei angelegt, die alle von mir gesetzten Strings enthält. Beim erzeugen eines Formulars wird über Konstanten der jeweilige Text gesucht und gesetzt. Die String von Systemfehlermeldungen werden nicht in das Sprachfile übernommen, da diese automatisch ermittelt werden, korrekt?

Bsp:

Delphi-Quellcode:

const RC_MAIN_CAPTION = 0;
      RC_START_CAPTION = 1;

function GetText(Index: WORD): String;
begin
// Ermittelt den Text aus dem aktuell zugeordneten Sparchfile
end;

procedure TFomr1.Create(Sender: TObject);
begin
Caption:=GetText(RC_MAIN_CAPTION);
Button1.Caption:=GetText(RC_START_CAPTION);
.
.
.
end;

Ist diese Vorgehensweise sinnvoll ??
Ich wäre über Eure Meinung dankbar.