макрос Calc - как получить позицию переноса

[mikekaganski]

В смысле? Вы хотите угадать язык просто строки? Это Вам к искусственному интеллекту, LibreOffice такого не умеет.

[timal1234]

Вы хотите угадать язык просто строки?

ну да (язык слова).

есть слово, надо сделать перенос... слово может быть RU или ENG ....

неужели невозможно узнать язык слова?
или только анализировать код ASCII ?

[timal1234]

LibreOffice такого не умеет.

как же так? язык ячейки умеет получить, а язык строковой переменной - нет ?

[mikekaganski]

Если только en/ru, то тогда это просто - именно по кодам (Unicode). Меньше 128 - английский.

[mikekaganski]

как же язык ячейки умеет получить, а язык строковой переменной - нет ?

Возможно, потому что у ячейки есть такое свойство? Причём это свойство никак не мешает пользователю выставить язык русский, а написать по-английски.

[timal1234]

Если только en/ru, то тогда это просто - именно по кодам (Unicode). Меньше 128 - английский.

вот по-моему на этом я и завалился, когда пытался сделать перенос через

Код Выделить Развернуть

vHyphen.hyphenate(STR_IN, aLocale, 11, emptyArgs())

[sokol92]

Это Вам к искусственному интеллекту, LibreOffice такого не умеет.

@timal, попробуйте поиграться с сервисом LanguageGuessing . Расскажите о результатах.

[mikekaganski]

@sokol92, это конечно интересно, но плохому учить не нужно!

Вот примитивная функция, определяющая язык по одной первой букве:

Код Выделить Развернуть

function simpleLangOfWord(byval word)
 word = trim(word)
 l = new com.sun.star.lang.Locale
 if Asc(word) < 128 then
  l.Language = "en"
  l.Country  = "US"
 else
  l.Language = "ru"
  l.Country  = "RU"
 end if
 simpleLangOfWord = l
end function

[timal1234]

ну что ж    ... буду анализировать ASCII-код

[timal1234]

Вот примитивная функция, определяющая язык по одной первой букве:

это легко    и я уже сделал сам     

Код Выделить Развернуть

    IF Asc(STR_IN) < 128 THEN
        ' ----- ENG -------
        aLocale.Language = "en"  'Использовать Английский язык
        aLocale.Country  = "US"      'Использовать Соединенное королевство (США) как страну
        '---------------------
    ELSE
        ' ----- RUS -------
        aLocale.Language = "ru" 'Использовать Русский язык
        aLocale.Country = "RU" 'Использовать Россию как страну
        '---------------------
    END IF но всё равно, СПАСИБО !

[kompilainenn]

К ремарке про немецкий в школе и проблемы с английским сейчас : я тоже учил немецкий в школе и универе, но когда я пришел в проект, стал нужен английский и я его начал учить и до сих пор учу, вроде как то получается даже.

К ремарке про "я не программист" - вы программист, раз пишете программу и у вас получается.

[timal1234]

но когда я пришел в проект, стал нужен английский и я его начал учить и до сих пор учу,

а у меня не хватает времени и на то (учить английский) и на это (макросы)
я ещё и Java хотел поизучать.... но воз и ныне там...
ну или это отговорка, чтоб не учить 

К ремарке про "я не программист"

имелось ввиду, что это не моя профессия, я скорее пытаюсь программировать