Как сменить язык в 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; |