Einzelnen Beitrag anzeigen

Benutzerbild von Marcel Gascoyne
Marcel Gascoyne

Registriert seit: 18. Nov 2003
Ort: Uetersen
271 Beiträge
 
Delphi 2005 Architect
 
#7

Re: Programm in mehrere Sprachen?

  Alt 23. Aug 2005, 10:57
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
Marcel Gascoyne
Der Fehler sitzt immer vor der Tastatur
  Mit Zitat antworten Zitat