Здесь, в Дании, я работаю над созданием приложения с использованием DevExpress.Но мне нужно локализовать элементы управления DevExpress, чтобы говорить по-датски.Но прежде чем я пошел на работу и сделал перевод сам, мне было интересно, если кто-то уже сделал это.Я использую cxLocalizerEditor для создания INI-файла с переводом.
Уже существует датский перевод?
Кто-нибудь получил локализацию пользовательских строк ресурсов для работы?Я не могу заставить его работать.
- Отредактированный пост для добавления примера кода, о котором я поговорю позже.
Пример из справки похож на следующий.Но я не могу заставить это работать вообще.использует cxLocalization, dxCore, cxClasses,;
type
TForm1 = class(TForm, IdxLocalizerListener)
cxLocalizer1: TcxLocalizer;
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
// ...
public
procedure TranslationChanged;
end;
// ...
procedure TForm1.Create(AOwner: TComponent);
begin
dxResourceStringsRepository.AddListener(Self);
inherited Create(AOwner);
end;
procedure TForm1.Destroy;
begin
dxResourceStringsRepository.RemoveListener(Self);
inherited;
end;
procedure TForm1.TranslationChanged;
begin
Caption := cxGetResourceString(@sAppName);
// ...
end;
Но я могу приступить к работе: (cxLanguage - это модуль, который я создал с помощью пользовательских строк ресурсов с помощью пользовательского интерфейса Localizer, а @sHpDbSettingsCaption - просто случайная строка ресурсов)1014 *
unit Unit1;
interface
uses
cxLocalization, dxCore, cxClasses, cxLanguage,
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm, IdxLocalizerListener)
procedure FormShow(Sender: TObject);
private
public
procedure TranslationChanged;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormShow(Sender: TObject);
begin
TranslationChanged;
end;
procedure TForm1.TranslationChanged;
begin
Caption := cxGetResourceString(@sHpDbSettingsCaption);
end;
end.