Страница 1 из 3

List & Label 18

Добавлено: 15 Май 2013, 13:33
nik190994
Пытаюсь освоить List & Label 18
Наткнулся на то что дизайнер отчетов упорно говорит по немецки...
Как изменить язык?

Re: List & Label 18

Добавлено: 15 Май 2013, 15:02
Yufil
1. У тебя должны быть файлы cmll1821.lng и cmll1821s.lng .
Число 21 - код языка, 00-немецкий, 01-английский.

Можно, по идее, заменить cmll1800.lng на cmll1821.lng и всё будет на вел. и мог.

2. При открытии задания можно ( и нужно) сообщить код языка.

Job#=LlJobOpen( 21 )

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

If LLSetOption(Self.Job,LL_OPTION_CodePage,204).
If LLSetOption(Self.Job,LL_OPTION_FORCEFONTCHARSET,204).
If LLSetOption(Self.Job,LL_OPTION_TABREPRESENTATIONCODE,08aH).
If LLSetOption(Self.Job,LL_OPTION_RetREPRESENTATIONCODE,0b6H).
If LLSetOption(Self.Job,LL_OPTION_EXPRSEPREPRESENTATIONCODE,0a6h).

Наконец, в шаблонах Философова :) есть параметр, переключающий язык ...

Re: List & Label 18

Добавлено: 16 Май 2013, 6:18
nik190994
Огромное СПАСИБО...
Заменил cmll1800.lng на cmll1821.lng и стало "говорить" по рксски...

Re: List & Label 18

Добавлено: 16 Май 2013, 6:41
morkovin
nik190994 писал(а):Пытаюсь освоить List & Label 18
А какое "лекарство" для ЛЛ18? от 15-го подходит?

Re: List & Label 18

Добавлено: 16 Май 2013, 11:37
nik190994

Re: List & Label 18

Добавлено: 20 Май 2013, 11:34
nik190994
Проблема была в шаблоне...
Нодо добавить

#Group(%SetLanguage)
#CASE(%Language)
# ================================
#OF('Russian')
#SET(%WhichLanguage,33)

# ================================
#ENDCASE

Забыли немцы русских... :D

P.S. Спасибо Yufil за наводку...

Re: List & Label 18

Добавлено: 21 Май 2013, 11:33
morkovin
nik190994 писал(а):Огромное СПАСИБО...
Заменил cmll1800.lng на cmll1821.lng и стало "говорить" по рксски...
А где взять cmll1821.lng? Или самому создавать? :(

Re: List & Label 18

Добавлено: 21 Май 2013, 12:26
nik190994
У меня они создались при инсталляции...

Re: List & Label 18

Добавлено: 21 Май 2013, 12:39
morkovin
nik190994 писал(а):У меня они создались при инсталляции...
Повезло тебе... :)

Re: List & Label 18

Добавлено: 21 Май 2013, 16:28
Yufil
Я, когда сильно не везло, за пару-тройку часов с помощью Resource Hacker (Restorator почему-то не подходит) делал русские языковые файлы из предыдущей версии. На крайняк можно сделать копию 01 -> 21 и иметь вместо русского аглицкий), а потом изготовить правильный файл.

Re: List & Label 18

Добавлено: 06 Август 2013, 14:50
DPZ
Пока безуспешно пытаюсь перевести LL16 из задачи под 6-кой на clarion9. Ругается на отсутствие файла библиотеки claLL16.lib. Кто-то юзает под клашей 8-9 ?

Re: List & Label 18

Добавлено: 06 Август 2013, 15:10
Дед Пахом
DPZ писал(а):Пока безуспешно пытаюсь перевести LL16 из задачи под 6-кой на clarion9. Ругается на отсутствие файла библиотеки claLL16.lib. Кто-то юзает под клашей 8-9 ?
Надо перекомпилировать ll.clw под 8-кой (9-кой соответственно). Если, конечно, есть ll.clw. Я бы дал dll/lib, да имею только для 15-го и 18-го L&L.

Re: List & Label 18

Добавлено: 06 Август 2013, 15:43
DPZ
Рабочий каталог с ll.clw и библиотеками есть. Подскажи порядок компиляции. Не суди строго. Заранее спасибо.

Re: List & Label 18

Добавлено: 06 Август 2013, 15:57
Дед Пахом
Надо пересобрать 2 проекта:

файл LLCLASS.PRJ

Код: Выделить всё

-- LlClass
#noedit
#system win32
#model clarion dll
#pragma define(maincode=>off)
#set RELEASE = on
#pragma debug(vid=>off)
#pragma optimize(cpu=>386)
#pragma define(_ll_=>1)
#compile "llclass.clw"
#compile "ll.clw"
#pragma link("cmll16.lib")
#link "clall16x.dll"
файл llclassl.prj

Код: Выделить всё

-- LlClass
#noedit
#system win32
#model clarion lib
#pragma define(maincode=>off)
#set RELEASE = on
#pragma debug(vid=>off)
#pragma optimize(cpu=>386)
#pragma define(_ll_=>1)
#compile "llclass.clw"
#compile "ll.clw"
#pragma link("cmll16.lib")
#link "clall16l.lib"

Re: List & Label 18

Добавлено: 06 Август 2013, 17:20
DPZ
При компиляции не находит файл clall16x.res. Где покопаться?