Übersetzung in andere Sprachen mit bestimmten Anforderungen

[Furtbichler]

dxGetText liefert auch eine editierbare Textdatei, nur ist die nicht sonderlich benutzerfreundlich. Dafür gibt es spezielle Editoren, die auch umme sind. Aber vielleicht ist das mit Kanonen auf Spatzen schießen.

Je einfacher Du die Text-Datei gestaltest (INI-Datei z.B.), desto mehr musst Du im Code programmieren, was aber auch kein Beinbruch ist. Natürlich wäre es Toll, alles im Code automatisch zu machen, aber wie wäre es mit diesem Ansatz (funktioniert sofort)

Delphi-Quellcode:

uses
  myTranslations; // <-- contains a loaded Translations : TStringList'
Procedure TMyForm.FormCreate(...
begin
  Self.Caption := Translations.Values['TMyForm.Caption'];
  Label1.Caption := Translations.Values['TMyForm.Label1.Caption'];
  btOk.Caption := Translation.Values['Buttons.OK'];
....

Du setzt alle Beschriftungen also individuell zur Laufzeit. Das ist so banal, da traut man sich ja gar nicht, Dir das vorzuschlagen. Das sieht zwar dämlich aus, aber bei -sagen wir- < 20 Formularen ist der Zusatzaufwand wirklich nicht groß. Das ist in einer Stunde erledigt.

Die Textdatei sieht dann so aus:

Code:

TMyForm.Caption=Überschrift Formular 1
TMyForm.Label1.Caption=Vorname
Buttons.OK=OK

Natürlich ist das optimierbar (Sections etc.) und die Schlüssel in der Textdatei kannst Du ja auch noch für den Endanwender kompatibler gestalten (Wer kann sich schon etws unter 'TMyForm.Label1.Caption' vorstellen?)

Wäre das nicht ein Anfang?