كيفية ترجمة قائمة قائمة مع FireMonkey؟

Question

لدي نموذج قائمة بالسكان قائمة قاعدة بيانات. أرغب في إضافة عنصر أخير يسمى "العودة" وأضيفه من الكود المصدري بهذه الطريقة:

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

لدي مكون tlang مع سلسلة "العودة" المترجمة إلى لغات أخرى ، ولكن هذا العنصر لم يتم نقله (يظهر دائمًا "العودة").

كيف يمكنني ضبطه ليتم ترجمته باستخدام TLANG (تمت إضافة جميع المكونات من التصميم ويتم عرض جميع المشاهدات المترجمة بشكل صحيح).

شكرًا

Answer 1

يمكنك الحصول على النص المترجم الحالي برمجيًا لمصدر العودة:

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

Answer 2

أسهل:

uses
  FMX.Types;

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

على Delphi FMX XE6 وما فوق