Форум » GUI » Интерфейс с украинским языком ? » Ответить

Интерфейс с украинским языком ?

Andrey: Объявился у меня старый заказчик из Киева, у него Win10 с тремя языками. Нужно ему сделать печать на украинском в ФастРепорте. Вопрос такой - как для имеющей сейчас программы МиниГуи добавить украинский режим сохранения ini-файлов ? И как переключать принудительно на украинский язык отдельное окно для настроек текстовых данных ? Типа банк, расчётный счёт и другие различные сообщения. Заранее СПАСИБО за ответ.

Ответов - 66, стр: 1 2 3 4 All

Andrey: Если основной текст программы в RU1251, то языковой модуль для этой программы (отдельный prg) делаем его в кодировке utf-8: [pre2] IF cLang == "RU1251" xRet := { "Удалить последний фильтр столбца",; "Удалить ВСЕ фильтры по столбцам" } ELSEIF cLang == "UA1251" xRet := { "Видалити останній фільтр стовпця",; "Видалити ВСІ фільтри по стовпцях" } ELSEIF cLang == "KZWIN" xRet := {"Соңғы баған сүзгісін жою" ,; "БАРЛЫҚ сүзгілерді бағандар бойынша жою"} .... For i :=1 To Len(xRet) xRet := hb_Utf8ToStr(xRet , "RU1251") Next .... Return xRet[/pre2] И в основной программе размещаем эти текстовые константы. Так будет верно ?

SergKis: Andrey пишет Так будет верно ? Попробуй, это же не долго, у тебя все под рукой Возможно команды из текста prg utf8 убери в осн. модуль и правильно напиши[pre2] For i :=1 To Len(xRet) xRet := hb_Utf8ToStr(xRet , "RU1251") Next [/pre2] PS что за cdp будет стоять ?

Andrey: SergKis пишет: что за cdp будет стоять ? Да это сайт глюкнул. Писал так xRet [ nJ ] := hb_Utf8ToStr( xRet [ nJ ] , "RU1251")


SergKis: Andrey SergKis пишет:что за cdp будет стоять ? Ты переводишь все в RU1251, а какая cdp будет уставлена для работы в момент работы с текстом ?

Andrey: SergKis пишет: Ты переводишь все в RU1251, а какая cdp будет уставлена для работы в момент работы с текстом ? Так теrст проги установлен в 1251, значит все значения на форме будут в 1251. Это я под себя перевожу под 1251. А для других надо бы тогда по другому: [pre2]FUNCTION myLangeRes(..,cPrgCP) LOCAL xRet, cLang := hb_CdpSelect() ... xRet [ nJ ] := hb_Utf8ToStr( xRet [ nJ ] , cPrgCP) [/pre2]

Andrey: [pre2]REQUEST HB_CODEPAGE_UA1251, HB_CODEPAGE_UA866 // украинский язык REQUEST HB_CODEPAGE_RU1251, HB_CODEPAGE_RU866 // русский язык REQUEST HB_LANG_BEWIN // белорусский язык[/pre2] А как работать в МиниГуи с кодовой страницей LANG_BEWIN ? В Харборе есть кодовая страница LANG_BEWIN ?



полная версия страницы