質問

データベーステーブルのフォームフォームのリストボックスがあります。 「Go Back」と呼ばれる最後のアイテムを追加したいと思います。この方法でソースコードから追加します。

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

「Go Back」文字列が別の言語に翻訳されたTlangコンポーネントがありますが、このアイテムはトランスモルトではありません(常に「Go Back」を表示します)。

Tlangで翻訳するように設定するにはどうすればよいですか(すべてのコンポーネントがデザインから追加され、すべてのショーマスが正しく翻訳されていることが示されています)。

ありがとう

役に立ちましたか?

解決

現在の翻訳されたテキストをプログラムで取得できます。

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

他のヒント

より簡単に:

uses
  FMX.Types;

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

Delphi FMX XE6以上で

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top