Come tradurre un elencoBoxItem con Firemonkey?

Question

Ho una casella di lista popolata da una tabella di database. Voglio aggiungere un ultimo elemento chiamato "Vai indietro" e lo aggiungo dal codice sorgente in questo modo:

lbDGroup.Items.Add('GO BACK');

Ho un componente Tlang con la stringa "torna indietro" tradotta in altre lingue, ma questo oggetto non è transaltato (mostra sempre "tornare indietro").

Come posso impostarlo per essere tradotto con Tlang (tutti i componenti aggiunti dal design e tutti gli showMessages sono mostrati correttamente).

Grazie

Answer 1

Puoi ottenere il testo tradotto corrente a livello di programmazione della tua sorgente di ritorno:

var
  dGOBACK: string;
begin
  dGOBACK := Lang1.LangStr[Lang1.Lang].Values['GO BACK'];
  lbDGroup.Items.Add(dGOBACK);
end;

Answer 2

Più facile:

uses
  FMX.Types;

begin
  lbDGroup.Items.Add(Translate('GO BACK'));
end;

Su Delphi FMX XE6 e sopra