Programm in mehrere Sprachen?

[Marcel Gascoyne]

Zitat von smart:

GnuText habe ich mir auch schon angesehen, ist aber, meiner Meinung nach, zu kopliziert.

Was ist daran denn bitte kompliziert ? Du brauchst doch nur gnugettext in Deine Unit's einzubinden. In Deiner Projektdatei machst Du dann Deine Übersetzungsdomain bekannt:

Delphi-Quellcode:

begin
  textdomain('myapp');
  AddDomainForResourceString('myapp');
  
  Application.Initialize;
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
end.

In jedem Formular rufst Du im OnCreate Event die Übersetzung auf:

Delphi-Quellcode:

procedure TMainForm.FormCreate(Sender: TObject);
begin
  TranslateComponent(self);
end;

Einzelne Strings kannst mit der Funktion _() übersetzen, wie z.b. hier:

Label1.Caption := _('This is the translated string.'); Gruß,
Marcel