Einzelnen Beitrag anzeigen

Benutzerbild von Mazel
Mazel

Registriert seit: 11. Nov 2005
Ort: Leipzig
831 Beiträge
 
#18

Re: Anwendung mit Resourcestring mehrsprachig, aber wie?

  Alt 22. Jul 2006, 19:05
Ok, danke.

Ich werde diese Tools aber doch nicht verwenden, es ist einfach zu ümständlich. Ich habe es nun folgendermaßen gelöst (ist natürlich noch nicht fertig):

Delphi-Quellcode:
//eine Array-Konstante mit beiden Sprachen:
Lang: array[1..12] of String =
   ('Datei', 'File', 'Öffnen', 'Open', 'Liste der PlugIns...', 'PlugIns...',
    'Beenden', 'Close', 'Effekte', 'Effects', 'Vollbild', 'Fullscreen');

//Im Menü gibt es die Möglichkeit die Sprache zu ändern über Optionen -> Sprache -> Englsich oder Detusch
//im Tag steht für Deutsch die 1 und für Englisch die 2 eingegeben

//die SetLanguage Prozedur wird beim Klick auf die ensprechende Sprache aufgerufen
procedure TForm1.SetLanguage(LangID: Word);
begin
 //LangID: 1 - Deutsch; 2 - Englisch
 Datei.Caption:=Lang[0 + LangID];
 Oeffnen.Caption:=Lang[2 + LangID];
 PlugIns.Caption:=Lang[4 + LangID];
 Beenden.Caption:=Lang[6 + LangID];
 Effekte.Caption:=Lang[8 + LangID];
 Vollbild.Caption:=Lang[10 + LangID];
end;
Ist einfacher und braucht keine weiteren Programme. Ich brauche zwar bis zu 40 Zeilen Code für die Zuweisung aber ich kann den Text in dem Array ohne weiteres ändern.

Gruß
Mazel
Marcel Jänicke
www.mj-software.net
  Mit Zitat antworten Zitat