bekturgan

Полностью согласен. Действительно, если продукт предназначен для широкого круга то Вы абсолютно правы. Могу ли я в частном порядке использовать старую версию для личного пользования в своих целях или это чем то как то запрещено? Хочу отметить что в данном топике я задал два вопроса с целью изучения потребности рынка в подобных продуктах.

Почему?

Delphi 2010 Unigui 0.99.0.1169 триал На лицензию пока не хватает!

Добрый день! 1. Есть компонент меню (смотрите скрин): Привожу код инициализации: procedure TMainForm.UniFormActivate(Sender: TObject); var Spr: TBMMItems; Spr2: TBMMItems; Docs: TBMMItems; Docs3: TBMMItems; Docs23: TBMMItems; begin if not dura then begin dura:= true; UniSession.AddJS('document.title = "Парк оргтехники";'); BMMMenu:= TBMMMenu.Create(Self); Spr:= BMMMenu.BMMItems.Add(TBMMItems.Create('Справочники')); Spr.Add(TBMMItems.Create('Справочник1', 'img/6655.png')).ItemClickProc:= procedure(sender: TObject) begin UniSession.AddJS('alert("Справочник1 Click!!!");'); end; Spr2:= Spr.Add(TBMMItems.Create('Справочник2')); Spr2.Add(TBMMItems.Create('Справочник21')).ItemClickProc:= procedure(sender: TObject) begin UniSession.AddJS('alert("Справочник21 Click!!!");'); end; Spr2.Add(TBMMItems.Create('Справочник22')).ItemClickProc:= Spr22Click; Spr2.Add(TBMMItems.Create('Справочник23')); Spr2.Add(TBMMItems.Create('Справочник24')); Docs:= BMMMenu.BMMItems.Add(TBMMItems.Create('Документы')); Docs.Add(TBMMItems.Create('Документ1')); Docs3:=Docs.Add(TBMMItems.Create('Документ2')); Docs3.Add(TBMMItems.Create('Документ21')); Docs3.Add(TBMMItems.Create('Документ22')); Docs23:= Docs3.Add(TBMMItems.Create('Документ23')); Docs23.Add(TBMMItems.Create('Документ231', 'img/6655.png')); Docs23.Add(TBMMItems.Create('', '', true)); Docs23.Add(TBMMItems.Create('Однажды в студенную зимнюю пору я из лесу вышел обратно зашел!!!')); Docs23.Add(TBMMItems.Create('Документ233')); Docs3.Add(TBMMItems.Create('Документ24')); Docs.Add(TBMMItems.Create('Документ3')); BMMMenu.BMMItems.Add(TBMMItems.Create('Сервис')); BMMMenu.HTML; end; end; 2. Есть также фреймворк для отображения данных из Firebird: Особенности: Автоматическое создание форм с гридом, сортировкой, фильтрацией, лукапами, выводом в ехсель, загрузкой файлов в поле записи, автоматическая обработка вставки, обновления записи, мастер-детайл. Принцип такой: создал таблицы, запустил одну процедуру и получил ВСЕ Вышеперечисленное на автомате!!! Разумеется есть и тонкая настройка! Все что нужно это запустить одну процедуру!!! BMM_Actor.CreateFreeSpravka('Журнал актов', TFrameAktJrn, function: string begin result:= '{"params": [{"p" : "DT1", "v": "' + UniDateTimePicker1.Text + '", "t" : "datetime", "valuetype" : "value"}, ' + '{"p" : "DT2", "v": "' + UniDateTimePicker2.Text + '", "t" : "datetime", "valuetype" : "value"}], "panel": "Pan_Viols"}'; end, '[{"panel": "Pan_Viols", "provider": "NewAkt"}]', '{"params": [{"p" : "DT1", "v": "' + UniDateTimePicker1.Text + '", "t" : "datetime", "valuetype" : "value"}, ' + '{"p" : "DT2", "v": "' + UniDateTimePicker2.Text + '", "t" : "datetime", "valuetype" : "value"}], "panel": "Pan_Viols"}', '[{"panel": "Pan_Viols", "insert_proc": "VIOLS_INS", "update_proc": "VIOLS_UPD1"}]' ); Фреймворк реализован двумя компонентами с собственным визуальным редактором свойств, где все можно настроить (см Картинку) Вопрос 1: Можно ли все это продавать (недорого) Вопрос 2: Сколько подобное стоит? (примерно) Меню расчитываю продать по 10$ за копию Фреймворк по 50$

Money is not enough for the official version

0.99.0.1169

trial verison

O120.iframeEl.dom.contentWindow.document.addEventListener("keypress", function (evt) {alert("123")}, true) !!!

Hello! How to bind a Keypress event to UniHTMLMemo?