On-line: гостей 1. Всего: 1 [подробнее..]
АвторСообщение
постоянный участник




Пост N: 6875
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 29.01.21 16:55. Заголовок: Интерфейс с украинским языком ?


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

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 66 , стр: 1 2 3 4 All [только новые]


постоянный участник




Пост N: 7185
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 18.12.21 17:31. Заголовок: Если основной текст ..


Если основной текст программы в RU1251, то языковой модуль для этой программы (отдельный prg)
делаем его в кодировке utf-8:
      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

И в основной программе размещаем эти текстовые константы.
Так будет верно ?

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4013
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 18.12.21 17:39. Заголовок: Andrey пишет Так буд..


Andrey пишет
 цитата:
Так будет верно ?


Попробуй, это же не долго, у тебя все под рукой
Возможно команды из текста prg utf8 убери в осн. модуль и правильно напиши
 
For i :=1 To Len(xRet)
xRet := hb_Utf8ToStr(xRet , "RU1251")

Next

PS
что за cdp будет стоять ?

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 7186
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 18.12.21 19:16. Заголовок: SergKis пишет: что ..


SergKis пишет:

 цитата:
что за cdp будет стоять ?


Да это сайт глюкнул.
Писал так
xRet [ nJ ] := hb_Utf8ToStr( xRet [ nJ ] , "RU1251")

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 4014
Зарегистрирован: 17.02.12
ссылка на сообщение  Отправлено: 18.12.21 19:22. Заголовок: Andrey SergKis пише..


Andrey
SergKis пишет:
 цитата:
что за cdp будет стоять ?


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

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 7187
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 18.12.21 20:24. Заголовок: SergKis пишет: Ты п..


SergKis пишет:

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


Так теrст проги установлен в 1251, значит все значения на форме будут в 1251.
Это я под себя перевожу под 1251.

А для других надо бы тогда по другому:
FUNCTION myLangeRes(..,cPrgCP) 
LOCAL xRet, cLang := hb_CdpSelect()
...
xRet [ nJ ] := hb_Utf8ToStr( xRet [ nJ ] , cPrgCP)


Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N: 7628
Зарегистрирован: 12.09.06
ссылка на сообщение  Отправлено: 01.12.23 18:28. Заголовок: REQUEST HB_CODEPAGE_..


REQUEST HB_CODEPAGE_UA1251, HB_CODEPAGE_UA866    // украинский язык  
REQUEST HB_CODEPAGE_RU1251, HB_CODEPAGE_RU866 // русский язык
REQUEST HB_LANG_BEWIN // белорусский язык

А как работать в МиниГуи с кодовой страницей LANG_BEWIN ?
В Харборе есть кодовая страница LANG_BEWIN ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 66 , стр: 1 2 3 4 All [только новые]
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 69
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет