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

No more LиЦеnсе

Добавлено: 27 июл 2004, 12:57
Kareno
Вообщем проснулся я сегодня с той ноги!
Радуйся о Галактический народ!

А? как в рифму-то попал?

Вообщем наскучило мне одному пользоваться благами Галактической глупости ;) делюсь
если написать вот такой интерфейсик:
Const
cmA1 = 9994444;
cmA2 = 9994445;
cmA3 = 9994446;
cmA4 = 9994447;
cmA5 = 9994448;
cmA6 = 9994449;
cmA8 = 9994450;
cmA9 = 9994451;
cmA10 = 9994452;
cmA11 = 9994453;
cmA12 = 9994454;
end;

Interface iBuhBlok 'Бухгатерский блок' EscClose;
Show at (1,1,88,17)
create view as select * from adoc;

Screen scrHint;
Buttons
cmA1;
cmA2;
cmA3;
cmA4;
cmA5;
cmA6;
cmA7;
cmA8;
cmA9;
cmA12;
cmA10;
cmA11;
<<

СНАБЖЕНИЕ СБЫТ ПОСТАВЩИКИ, ПОЛУЧАТЕЛИ

<. Приходные накладные .> <. Документы - основания .> <. Хронология расчетов .>

<. Расходные накладные .> <.Расчеты с контрагентом.>
КЛИЕНТ
<. Клиент .> <. Рекламационные накладные .> <. Закупки товаров .>

<. Акты приемок .>
ФРО
<. Бугалтерская справка .> <. Счета - фактуры .>

<. Реализация товаров .>
>>
end;

HandleEvent
cmA1:RunInterface('SoprDocb',101); //прих накл
cmA2:RunInterface('VSchet'); //ДО расх
cmA3:Runinterface('Rep_plv',1); //Хронология
cmA4:RunInterface('SoprDoc'); //Расх накл
cmA5:Runinterface('Rep_plv',0); //Расч с контр
cmA6:RunInterface('ClientCard'); //карт клиента
cmA7:RunInterface('AktRec',106); //Реклам накл
cmA8:RunInterface('RepBS', 0, false); //закупка тов
cmA9:RunInterface('AktUslB',114); //акты приемок
cmA12:RunInterface('PlPor',10, 0); //бух справки
cmA10:RunInterface('SchFact',0,1); //счета-фактуры
cmA11:RunInterface('RepBS', 1, false); // реализ товаров
end;
end.

причем команды запуска в лёгкую берутся из Протекта после раздачи прав на менЮ(подсказка в отчете по правам на тебЮ)
а потом подключить его через вот такой вот отчетик:
.Form 'ard_AHint'
.ard
.NameInList "Бухгалтерский блок"
.F 'nul'
.begin
RunInterface('iBuhBlok');
end.
.endform

и скомпилировать всё это вот таким вот проектиком:
#make "BuhBlok.vip"
#make "BuhBlok.frm"

то...
одно только и неудобно можно вызывать фейсы по очереди. ну да зато сколько удовольствия ;)
Всем спасибо, особенно Галактике.

Re: No more LиЦеnсе

Добавлено: 27 июл 2004, 15:41
Maverick
А версия галки? )))
В 585 насколько я знаю происходит проверка на наличие лицензии при запуске любого интерфейса любого модуля....

Re: No more LиЦеnсе

Добавлено: 27 июл 2004, 16:46
Kareno
вообще-то работает ;)

есть вопрос кто-бы проверил на 7-ке?
а то у меня нету ;(

Re: No more LиЦеnсе

Добавлено: 27 июл 2004, 21:00
Frodo
Заметил в 5.74 (что дальше не знаю).
- Правый клик на панельке быстрого доступа (где батоны разные)
- Настройка
- Клик в "добавить"
- Выбираем "режим" и "группу"
- Выбираем любой интерфейс (самое трудное, их там много)
- Дальше можем даже значек прикрутить.
Железный ключ, который в серванте торчит, ничего не заметит.
Предполагаю - контроль на уровне главного меню.

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 11:20
Kareno
Супер мне это даже больше понравилось ;)

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 11:34
ALEKS123
To Maverick
>В 585 насколько я знаю происходит проверка на наличие лицензии при запуске любого интерфейса любого модуля....

В том-то вся и фича, что НЕТ, ГАЛЯ не проверет лицензии, когда ее стандартные фейсы запускаются из самописных. А посему, то что написал Виктор Андросов - истинная правда. Я пошел немного другим путем, но в том же направлении. Чистая экономия - 25-30 лицензий разных контуров. :)

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 11:55
Den
Дядьки, выч его хоть об этом в открытую пишите..разработчики из конторы тоже почитывают этот форум... ;)

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 11:55
Den
Дядьки, вы чего хоть об этом в открытую пишите..разработчики из конторы тоже почитывают этот форум... ;)

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 12:42
Vitas
Теперь ждите выхода следующей версии с исправлением контроля ликов :)

Вот тогда скорее всего и пожелеете об открытой дискусии :)

Re: No more LиЦеnсе

Добавлено: 28 июл 2004, 13:36
Maverick
Небольшой совет тогда - попробуйте через РМП тогда настроить соответствующие менюхи с нужной вам группировкой.

А насчет переделки модуля контроля лицензий, так все к этому и идет... и виной тому - не дискуссия поднятая здесь, а переработка самой концепции разработки. Насколько мне известно, ведутся работы по наследованию свой-ств объектов. Т.е. любая сущность в галке - будь то переменная, интерфейс, отчет, таблитца БД - будет являться внутренним объектом отдельно взятого модуля, и использовать его можно будет только внутри этого модуля. Зато появятся точки расширений, с помощью которых можно бдет встраивать свои доработки... Но опять таки - используя внутренние объекты модуля и их потомков...
Вот так... Так что мы имеем пока то, что имеем. Пользуйтесь, пока возможно... Ибо Апокалипсис - не за горами )))

Re: No more LиЦеnсе

Добавлено: 29 июл 2004, 11:12
oiko
можно и через РМП просто на момент сборки
РМП надо заставить забыть галке свои родные фейсы