"Склад3D" - ActiveX-компонента для 1С [DEMO]

06.05.09

Разработка - Работа с интерфейсом

Демонстрация возможности создания визуального отображения размещения
товара на складе.
Так же использование 3Д объектов в 1С, на примере Кинозала 3D (http://infostart.ru/projects/4030/ ), спасибо biv75

Скачать исходный код

Наименование Файл Версия Размер
Демо
.1234947606 27,58Kb
412
.1234947606 27,58Kb 412 Скачать бесплатно

*** Для работы компоненты потребуется установленный Microsoft .NET Framework 3.5, который можно скачать отсюда.
http://www.microsoft.com/downloads/details.aspx?familyid=ab99342f-5d1a-413d-8319-81da479ab0d7&displaylang=en

и зарегистрировать компоненту в Windows - запустить reg.bat
(для удаления информации о компоненте в Windows - запустить unreg.bat)
или использовать совместно с хранилищем внешних компонент: //infostart.ru/projects/2863/

Использование мышки: зажать левую кнопку мышки для вращения,
использовать колесо прокрутки для зума,
правая кнопка мыши на объекте - его информация.

*** Добавление на форму 1С:

v7: Использовать 1С++:

Перем Склад3Д;
Процедура ПослеОткрытия() Склад3Д = СоздатьОбъект("АктивИкс"); 
  Склад3Д.УстановитьАтрибут(Форма, "АктХ"); 
//"АктХ" - идентификатор элемента диалога, на месте которого будет создан элемент ActiveX. //только для реквизитов диалога типа "Текст". Склад3Д.СоздатьЭУ("Душелов.Склад3D"); 
  Склад3Д.УстановитьФокус();
КонецПроцедуры //Событие ПриИзмененииПозицииКамеры Процедура АктХ_ПриИзмененииПозицииКамеры(x, y, z, Дистанция) КонецПроцедуры 


//****

v8: Меню "Форма" - "Вставить ActiveX..." - Выбрать элемент "Душелов.Склад3D"

*** События:

- ПриИзмененииПозицииКамеры(x, y, z, Дистанция)

*** Методы:

ОБЪЕКТЫ:

   ДобавитьКонтейнер(x, y, z, Высота, Ширина, Глубина, a, r, g, b, Прозрачность); //a,r,g,b - цвет ДобавитьСтеллаж(x, y, z, ВысотаЯчейки, ШиринаЯчейки, ГлубинаЯчейки, КоличествоЯчеекВРяде, КоличествоРядов); //a,r,g,b - цвет ДобавитьЯчейкуСтеллажа(x, y, z, Высота, Ширина, Глубина, a, r, g, b, Прозрачность);
   ДобавитьГоризонтальнуюПанель(Имя, x, y, z, Ширина, Глубина, a, r, g, b, Прозрачность);


КАМЕРА:

   УстановитьПозициюКамеры(x, y, z);
   УстановитьZoom(Дистанция);



*** ИСТОРИЯ:

17.09.2008:

- Добавил ряд новых методов и событие (треуется перерегистрация компоненты reg.bat)

16.09.2008:

- ДЕМО-версия

См. также

Богатый редактор картинок, хранимых в базе, с возможностью РИСОВАНИЯ. Редактор внешних файлов картинок. Объект, расширяющий возможности работы с картинками из встроенного языка (Три в одном) + Обработка «Стандартизация картинок»

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Обработка предназначена для редактирования картинок в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Также обработка может быть использована из встроенного языка как объект для редактирования картинок. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Данная обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015    62221    43    59    

81

Управление дашбордами

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Обработка предназначена для создания и управления дашбордами.

2400 руб.

29.06.2020    17051    22    4    

36

Новогоднее оформление для 1С

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023    11451    768    elcoan    45    

106

Конструктор HTML, CSS и javascript

Инструментарий разработчика Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

2 стартмани

10.04.2023    10065    155    acces969    31    

119

Модель состояния для MVC

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    4067    kalyaka    4    

29

Табло очереди заказов на экран телевизора

WEB-интеграция Работа с интерфейсом Платформа 1С v8.3 1С:Розница 2 Платные (руб)

Связка из веб-приложения и расширения для 1С: Розница 2.3.

3600 руб.

29.04.2022    12425    1    5    

11

Условное оформление элементов форм в пользовательском режиме 1С (управление видимостью и доступностью элементов форм)

Работа с интерфейсом Платформа 1С v8.3 Платные (руб)

Подсистема условного оформления элементов форм (далее подсистема) предназначена для настройки оформления элементов форм (видимость, доступность, цвет фона, цвет текста и прочее) в пользовательском режиме 1С. Также подсистему возможно использовать для ограничения доступа к реквизитам формы для определенных пользователей (или групп пользователей).

6000 руб.

18.01.2022    9028    1    2    

6

Программный интерфейс для доработки форм

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Реализовал простой способ программного создания новых элементов, команд и реквизитов на форме.

25.11.2021    9833    AtamanovYS    19    

139
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Душелов 4018 17.11.08 01:04 Сейчас в теме
Разработка была не время остановлена, теперь выложил снова.
6. SvSoft 80 28.11.08 08:06 Сейчас в теме
(1) А расширение функционала какое-нить планируется в перспективе?
7. Душелов 4018 28.11.08 09:05 Сейчас в теме
(6) В перспективе - да. Есть ряд задумок, которые будут добавлены.
Одна из них - визуальная дефрагментация ;)
8. SvSoft 80 28.11.08 10:47 Сейчас в теме
(7) А насколько близка сия перспектива?
визуальная дефрагментация - what is it?
9. Душелов 4018 28.11.08 10:49 Сейчас в теме
(8) Складская логистика.
Близка? Как начнется практическое внедрение, тогда... Думаю, что не в этом году, хотя кто знает...
2. Душелов 4018 17.11.08 01:04 Сейчас в теме
В комплекте идут демо для 7.7 и 8.1
3. kitt 323 17.11.08 08:04 Сейчас в теме
можно глупый вопрос))?
a, r, g, b, Прозрачность - в чем разница между а и Прозрачность?
я думал, что в модели argb альфа-канал - это и есть прозрачность..
4. Душелов 4018 17.11.08 11:13 Сейчас в теме
(3) Это так работает фреймворк 3.5 ;) Там есть такой параметр.
5. Душелов 4018 17.11.08 17:19 Сейчас в теме
(3) Видимо это свойство используется, когда на объект текстура накладывается, у которой нет альфа-канала.
10. SvSoft 80 02.12.08 09:17 Сейчас в теме
А текстуры прикрутить не думал? и на сколько это сложно?
11. Душелов 4018 02.12.08 09:21 Сейчас в теме
(10) Текстуры можно, и, в принципе, не сложно.
12. SvSoft 80 03.12.08 13:26 Сейчас в теме
Нуууу... тогда ждем-с :-)
13. Душелов 4018 03.12.08 13:28 Сейчас в теме
(12) Вопрос в производительности... Я сознательно упростил формирование стеллажей, т.к. собирать из коробок - и несколько тысяч ячеек - тормозило довольно прилично. А если еще и текстуры коробок налепить... ;)

Конечно, можно оптимизировать, но для этого придется уйти в эту технологию с головой, а времени у меня столько нет.
14. iliasay 03.12.08 15:32 Сейчас в теме
Коллега. А ваше решение можно прикрутить не к 1С. А к WMS. Что бы по адресному пространству описанному в БД системы. можно было загрузить модель. На модели используя поисковик по критериям находить объекты сподсвечиванием нахождения товара или группы товаров
15. Душелов 4018 03.12.08 15:43 Сейчас в теме
(14) Прикрутить можно к тем программам, которые используют ActivX технологию.
16. iliasay 05.12.08 15:54 Сейчас в теме
Коллега, а можете мне написать на iliasay@list.ru о возможности сотрудничества. Хотелось бы с Вами пообщаться вне рамок форума.
17. iliasay 13.12.08 14:12 Сейчас в теме
Коллега приветствую. Я вам на ваш мейл письмо переслал. Посмотрите плиз
18. inkko 25.01.09 19:22 Сейчас в теме
Очень интересно, но нужно добавить функциональности, иначе малоприменимо.
Расположение, количество стеллажей;
Свойства стеллажа, ячейки - (МОЛ, дата последнего обновления, тип продукции);
поиск товара по подсвеченной ячейке

19. Душелов 4018 26.01.09 12:05 Сейчас в теме
(18) Это не для бесплатной разработки :)
20. inkko 27.01.09 23:36 Сейчас в теме
21. alex_4x 85 03.02.09 21:06 Сейчас в теме
Супер реализация!
мне склад не нужен, но вот посмотреть заголовочные файлы и оснастку для c# было бы очень интересно. Можно исходник вызова просто графического окна с желательно d3d в виде active-X компонента ?

графики можно как красиво делать, всякие объемные опять же....
22. Душелов 4018 13.02.09 19:34 Сейчас в теме
Для получения демо-версии или покупки обращайтесь по контактам, указанным в профиле.
23. vovchai 06.03.09 09:51 Сейчас в теме
сколько стоит не демо?
24. orvv 22.04.09 14:37 Сейчас в теме
25. boich 25.04.09 13:03 Сейчас в теме
и сколько же стоит? Где ответ?
26. Душелов 4018 25.04.09 17:19 Сейчас в теме
(25) Ни сколько. Это - демонстрация возможности создания 3д-склада.
27. Душелов 4018 06.05.09 10:45 Сейчас в теме
Кинозал 3D, сделанный biv75 на этой компоненте http://infostart.ru/projects/4030/

Понравилось! :)
28. d.snissarenko 152 06.05.09 11:12 Сейчас в теме
{Форма.Форма(80)}: Ошибка при вызове метода контекста (УстановитьПозициюКамеры): Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
ЭлементыФормы.ЭлементУправления1.УстановитьПозициюКамеры(КамераX, КамераY, КамераZ);
по причине:
Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
30. Душелов 4018 06.05.09 11:36 Сейчас в теме
(28) Это при каких действиях?
И всю трассировку мне не надо ;) Достаточно описания ошибки.
29. d.snissarenko 152 06.05.09 11:14 Сейчас в теме
System.OverflowException не обработано
Message="Переполнение в результате выполнения арифметической операции."
Source="mscorlib"
StackTrace:
в System.RuntimeType.ForwardCallToInvokeMember(String memberName, BindingFlags flags, Object target, Int32[] aWrapperTypes, MessageData& msgData)
в Душелов.Склад3D.Sklad3DEvents.ПриИзмененииПозицииКамеры(Double X, Double Y, Double Z, Double Дистанция)
в Душелов.Склад3D.Sklad3D_ПриИзмененииПозицииКамеры(Double x, Double y, Double z, Double dist)
в Душелов.Sklad3D.OnRender(DrawingContext drawingContext)
в Душелов.Sklad3D.OnMouseMove(Object sender, MouseEventArgs me)
в System.Windows.Input.MouseEventArgs.InvokeEventHandler(Delegate genericHandler, Object genericTarget)
в System.Windows.RoutedEventArgs.InvokeHandler(Delegate handler, Object target)
в System.Windows.RoutedEventHandlerInfo.InvokeHandler(Object target, RoutedEventArgs routedEventArgs)
в System.Windows.EventRoute.InvokeHandlersImpl(Object source, RoutedEventArgs args, Boolean reRaised)
в System.Windows.UIElement.RaiseEventImpl(DependencyObject sender, RoutedEventArgs args)
в System.Windows.UIElement.RaiseEvent(RoutedEventArgs args, Boolean trusted)
в System.Windows.Input.InputManager.ProcessStagingArea()
в System.Windows.Input.InputManager.ProcessInput(InputEventArgs input)
в System.Windows.Input.InputProviderSite.ReportInput(InputReport inputReport)
в System.Windows.Interop.HwndMouseInputProvider.ReportInput(IntPtr hwnd, InputMode mode, Int32 timestamp, RawMouseActions actions, Int32 x, Int32 y, Int32 wheel)
в System.Windows.Interop.HwndMouseInputProvider.FilterMessage(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
в System.Windows.Interop.HwndSource.InputFilterMessage(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
в MS.Win32.HwndWrapper.WndProc(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam, Boolean& handled)
в MS.Win32.HwndSubclass.DispatcherCallbackOperation(Object o)
в System.Windows.Threading.ExceptionWrapper.InternalRealCall(Delegate callback, Object args, Boolean isSingleParameter)
в System.Windows.Threading.ExceptionWrapper.TryCatchWhen(Object source, Delegate callback, Object args, Boolean isSingleParameter, Delegate catchHandler)
в System.Windows.Threading.Dispatcher.WrappedInvoke(Delegate callback, Object args, Boolean isSingleParameter, Delegate catchHandler)
в System.Windows.Threading.Dispatcher.InvokeImpl(DispatcherPriority priority, TimeSpan timeout, Delegate method, Object args, Boolean isSingleParameter)
в System.Windows.Threading.Dispatcher.Invoke(DispatcherPriority priority, Delegate method, Object arg)
в MS.Win32.HwndSubclass.SubclassWndProc(IntPtr hwnd, Int32 msg, IntPtr wParam, IntPtr lParam)
InnerException:

31. d.snissarenko 152 06.05.09 13:32 Сейчас в теме
Это открываю демку, долго долго открывает и сразу как открыл бегунок с прозрачностью решил подвинуть
32. d.snissarenko 152 06.05.09 13:32 Сейчас в теме
34. biv75 06.05.09 13:34 Сейчас в теме
(32) Может видюха не тянет, у меня из-за видюхи вылетало
33. d.snissarenko 152 06.05.09 13:33 Сейчас в теме
Прозрачность на середину и бегунком оси икс влевоправо и вылетает
35. d.snissarenko 152 06.05.09 13:35 Сейчас в теме
по поводу трассировки у меня это привело к зависанию 1ски в результате jit стартовал зачем-то :)
36. d.snissarenko 152 06.05.09 13:35 Сейчас в теме
ага в Hl2 играть тянет а 3 коробки показать нет :)
37. Пятница 22.05.11 19:52 Сейчас в теме
Доброго времени суток!
Хочу прикрепить к своей базе внешнюю обработку, но никак не получается. Обработка написана для 7.7 и 8.1. Я пытаюсь на 8.1 (Ошибка: Внешняя обработка не может быть прочитана данной версией программы. У меня 8.1.15.14) и 8.2 (Ошибка: отсутствуют модули некоторых процедур).

Обработку добавляю:
Конфигурация->Обработки->Вставить внешнюю обработку отчет.. ->Склад3D

Подскажите как решить проблему эту? (Желательно с указанием четких инструкций).
38. bigalexis 10.10.11 11:37 Сейчас в теме
Очень интересно, честно не ожидал что можно делать такое в 1С
39. пользователь 01.02.12 14:45
Сообщение было скрыто модератором.
...
40. cnn_diablo 20.07.12 10:37 Сейчас в теме
Аналогичная ошибка:
{Форма.Форма(80)}: Ошибка при вызове метода контекста (УстановитьПозициюКамеры): Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
ЭлементыФормы.ЭлементУправления1.УстановитьПозициюКамеры(КамераX, КамераY, КамераZ);
по причине:
Произошла исключительная ситуация (mscorlib): Попытка деления на нуль.
41. Ёпрст 1063 20.07.12 10:40 Сейчас в теме
(40) Васи больше нет, так что уже никто не исправит ...
42. cnn_diablo 20.07.12 12:23 Сейчас в теме
В каком смысле нет? Больше никто этой темой (3D в 1С) не занимается?
43. Ёпрст 1063 20.07.12 12:29 Сейчас в теме
44. cnn_diablo 20.07.12 12:43 Сейчас в теме
Жалко, интересные вещи делал....
45. cnn_diablo 20.07.12 13:39 Сейчас в теме
Ссылка на кинотеатр http://infostart.ru/projects/4030/ не открывается, есть ли возможность ее разблокировать?
46. darkvett 06.12.14 10:43 Сейчас в теме
Где можно найти исходники? Я бы с радостью продолжил работу Василия.
47. ya.Avoronov 115 12.12.14 13:17 Сейчас в теме
А у меня ситуация вот какая:
1) Скачал демку,
2) Microsoft .NET Framework 3.5 установил
3) Зарегистрировал компоненты на Windows XP;
4) Перезапустил компьютер;
5) Запустил обработку Склад3D.epf под 1С 8.2

Посыпались ошибки:
{Форма.Форма.Форма(СОРОК ТРИ)}: Метод объекта не обнаружен (ДобавитьГоризонтальнуюПанель)
	Склад3Д.ДобавитьГоризонтальнуюПанель("Основной склад", КоордX, КоордY, КоордZ, ШиринаПола, ГлубинаПола, 255, 192, 192, 192, ПрозрачностьПола);


Жаль, но методы не обнаружены. Помогите разобраться с проблемой. Все начиналось, так хорошо!
48. Aser2000Aser 08.06.17 11:05 Сейчас в теме
ПОнимаю, что поздно, но мало ли..может быть кто-нибудь ответит.
Не работает zoom, в чем может быть причина?
Оставьте свое сообщение