Как сменить язык в FR во время выполнения программы?

Question: Как сменить язык в FR во время выполнения программы?

Answer:

а) использовать ресурсы в DLL. 
Скомпилируйте нужный ресурс в DLL (для этого запустите файл mkdll.bat из папки FRRESнужный_язык) и в программе подключите его строкой

1
frLocale.LoadDll('FR_ENGL.DLL');

 



Если нужно использовать ресурсы по умолчанию, сделайте

1
frLocale.UnloadDll;

 



б) ресурсы в текстовом файле или другом виде. Используйте событие frLocale.OnLocalize. Оно передает параметр StringID (номер строки) и ожидает возврата в параметр ResultString. Например:

1
2
3
4
5
6
7
frLocale.OnLocalize := MyClass.OnLocalize;
 
procedure TMyClass.OnLocalize(StringID: Integer; var ResultString: String);
begin
if StringID = 53000 then
ResultString := 'Search';
end;