БАЗИС 9 - Скрипты

ВНИМАНИЕ! Правила выкладывания скриптов.

1. Если в скрипте нет ссылок на фурнитуру, фрагменты и.т.д то достаточно его упаковать в архив и выложить.

2. Если в скрипте есть ссылки на фурнитуру, фрагменты и т.д. то архив должен содержать папку с самим скриптом и всеми файлами на которые есть ссылки в тексте скрипта.

Т.к. при запуске скрипта на другом компе возникает ошибка о не возможности открыть то или иной файл и скрипт до конца не отрабатывает свой текст. Не соблюдается "чистота проверки" работы скрипта.

__________________________________________________ _______________

Интересует информация по редактору скриптов в БМ8. Существует ли справочная документация и примеры использования скриптов в БМ8. Какие возможности дает данная функция? Владеющим информацией по данному вопросу просьба поделиться ею.

Для работы скриптов от Igor_482 необходим установленный ODBC драйвер FireBird, установленные и зарегистрированные в ОС модули FBDBDialog.dll, MSDATGRD.OCX, MSCOMCTL.OCX и MSSTDFMT.DLL (сообщение с описанием установки этих модулей в ОС, ссылка на модули и исходник "FBDBDialog.dll") а так же файл "ADODB.ini" с настройками соединения к БД в папке со скриптом.

ADODB.ini

[General]
FDBServ = t001
FBSPort = 14357
FDBFile = D:\DBBM\Библиотека\БД\BMDB09.FDB
FBCFile = C:\Windows\System32\fbclient.dll
----------------------------------------------
Переменные .ini:
FDBServ - имя ПК на котором находится сервер FireBird с используемой БД (если локально, то параметр: localhost или 127.0.0.1);
FBSPort - в настройке не нуждается (по умолчанию: 14357);
FDBFile - локальный путь к БД на сервере FireBird;
FBCFile - путь к файлу "fbclient.dll" (находится в корневой папке программы Базис).

[свернуть]

[NecroTYN]

Здравствуйте, стоит следующая задача - нужно указать на чертеже цвета материала выделенных панелей...

Возможно ли написать скрипт позволяющий при сохранении модели в линиях указать материал(Сокращение) выделенных панелей на выносных линиях ?

[v22884]

Напомните, пожалуйста, как определить поворот панели?

(то есть как получить те цифры? что показывает "Иформация о выделенных панелях"?)

Pan1.Rotation.ImagPart.x *(180/Math.PI)

не даёт правильной цифры,

на 360 тоже.

Видимо надо использовать Pan1.Rotation.RealPart, но как?.

[АлКузнецов]

Есть задача: В расчете размеров и координатах построения горизонтальной панели (полка), нужно сделать автоматическую поправку на толщину кромки вертикальной панели (боковины).

Вопрос: У кого нибудь есть пример удачного использования функции "InButtMaterial.Thickness". Спасибо заранее.

ЗЫ.

Спасибо. Решение найдено:

[dima-dn]

День добрый. Прошу помощи.
Подскажите пожалуйста, как вносить изменения в файлы с расширением *.frw, которые используются в скриптах?

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

Заранее спасибо

[FIDEL]

Сообщение от dima-dn

День добрый. Прошу помощи.
Подскажите пожалуйста, как вносить изменения в файлы с расширением *.frw, которые используются в скриптах?

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

Заранее спасибо

1.При вставке фрагмента на чертеж (перед редактированием) укажите точкой привязки ЛСК, чтобы потом не сильно думать над дальнейшим ее указанием при пересохранении фрагмента.
2.ОТредактируйте фрагмент так как вам нужно.
3.Выделите те элементы, которые вы хотите пересохранить в виде фрагмента.
4. Сохраните фрагмент в исходное, указав точкой привязки ЛСК. Теперь скрипт вытащит уже обновленный фрагмент.

[kaf07]

Только открыл редактор скриптов, тут же вопросы. Один из них:
Подскажите, пожалуйста, как сделать отступ паза для задней стенки регулируемым?
Traj.AddLine(0, -10, Dl.Value, -10); - это фиксированное расстояние, а хотелось бы его менять в параметрах Задней стенки, например.
Как сделать отступ для одной панели, вроде, понятно, но ведь паз строиться на четырех панелях поочередно, а хотелось бы задать один параметр для всех сразу....?

Приведенный пример из "Моя первая тумбочка".

[v22884]

Добавляет радиусы всех скруглений в имя выделенных панелей

Скрытый текст

Model.forEachPanel(function(obj) {
if (obj.Selected == true) {
rs = RadiusyVsehSkrugleniy(obj)
// alert (rs)
Undo.Changing(obj)
obj.Name = obj.Name + rs
}

});


function RadiusyVsehSkrugleniy(obj) {


c = obj.Contour
ck = c.Count
rad = 0;
Radiusy = [];
for (i = 0; i < ck; i++) {

if (c[i].ElType == 2) {

rad = Math.round(c[i].ArcRadius())
ir = Radiusy.indexOf(rad)
// alert(rad)
// alert(ir)
if (ir==-1)
{
Radiusy.push(rad)
}

}

}
tr = ''


for (i = 0; i < Radiusy.length; i++) {
//alert(Radiusy.length-1)
tr = tr + '| R'+ Radiusy[i]

}
return tr

}

[свернуть]

[АлКузнецов]

Есть задача: Необходимо из скрипта запускать ЧПУ и раскрой, смету в автоматическом режиме.
Подскажите, у кого-нибудь получалось запускать приложения Базис через консоль или COM интерфейс. Если да то как.
Заранее Спасибо.

[volunka]

Приветствую!
Появилась интересная потребность:

• В модели нужно добавить к позициям панелей, автоматически или вручную расставленным, позицию блока (вручную назначенную), содержащего эти панели.
• Если блок входит в другой блок, позиции добавлять по-очереди, иерархически, начиная с самого низкого уровня иерархии.

Вопрос к знающим, реально ли автоматизировать эту процедуру с помощью команд скриптов?)

[Am0ralist]

Сообщение от volunka

Приветствую!
Появилась интересная потребность:

• В модели нужно добавить к позициям панелей, автоматически или вручную расставленным, позицию блока (вручную назначенную), содержащего эти панели.
• Если блок входит в другой блок, позиции добавлять по-очереди, иерархически, начиная с самого низкого уровня иерархии.

Вопрос к знающим, реально ли автоматизировать эту процедуру с помощью команд скриптов?)

Реально.

Скрытый текст

1) для всех объектов, которые "панель"
2) если родитель объекта имеет класс объекта равный блоку, то
3) если позиция родителя отлична от нуля - добавляем значение позиции в позицию объект, ищем родителя родителя и возвращаемся в пункт 2.

[свернуть]