Vous pouvez obtenir le texte traduit actuel par programme de votre source Go Back:
var
dGOBACK: string;
begin
dGOBACK := Lang1.LangStr[Lang1.Lang].Values['GO BACK'];
lbDGroup.Items.Add(dGOBACK);
end;
Question
J'ai un formulaire peuplé de ListBox une table de base de données. Je veux ajouter un dernier élément appelé "Go Back" et je l'ajoute du code source de cette manière:
lbDGroup.Items.Add('GO BACK');
J'ai un composant TLANG avec la chaîne "Go Back" traduite dans d'autres langues, mais cet élément n'est pas transalté (il montre toujours "Go Back").
Comment puis-je le définir pour être traduit avec TLANG (tous les composants ajoutés à partir de la conception et toutes les deuxsses sont affichées correctement).
Merci
La solution
Vous pouvez obtenir le texte traduit actuel par programme de votre source Go Back:
var
dGOBACK: string;
begin
dGOBACK := Lang1.LangStr[Lang1.Lang].Values['GO BACK'];
lbDGroup.Items.Add(dGOBACK);
end;
Autres conseils
Plus facile:
uses
FMX.Types;
begin
lbDGroup.Items.Add(Translate('GO BACK'));
end;
sur Delphi FMX XE6 et au-dessus