Программа для расчёта конструкций RFEM 6 является основой нашей модульной системы программного обеспечения. Основная программа RFEM 6 используется для задания конструкций, материалов и нагрузок плоских и пространственных конструктивных систем, состоящих из плит, стен, оболочек и стержней. Программа также позволяет создавать комбинированные конструкции, а также моделировать тела и контактные элементы.
RSTAB 9 - это мощная программа для расчёта и проектирования 3D конструкций балок, каркасов или ферм, которая которая помогает инженерам-строителям соответствовать современным требованиям и отражает последние тенденции в области строительного проектирования.
Вы часто тратите слишком много времени на расчёт сечений? Программное обеспечение Dlubal и автономная программа RSECTION облегчают вашу работу, определяя характеристики и выполняя расчёт напряжений для различных сечений.
Вы всегда знаете, откуда дует ветер? Конечно, со стороны инноваций! RWIND 2 - это программа, которая использует цифровую аэродинамическую трубу для численного моделирования потоков ветра. Программа моделирует эти потоки вокруг зданий любой геометрической формы и определяет ветровые нагрузки на поверхности.
Вам нужен обзор зон снеговой, ветровой и сейсмической нагрузок? Тогда вы находитесь по адресу. Используйте инструмент Geo-Zone Tool для быстрого и лёгкого определения снеговых нагрузок, скоростей ветра и данных по сейсмике в соответствии с ASCE 7‑16 и другими нормативами различных стран.
Хотите попробовать в работе функции программ Dlubal Software? У вас есть такая возможность! Бесплатная полная версия на 90 дней позволяет вам в полной мере попробовать в работе все наши программы.
Поворот узловой опоры определяется посредством пользовательской системы координат. В следующем примере узловая опора повернута на 45 ° вокруг оси z. Нет необходимости определять новую систему координат через узлы. В этом случае достаточно использовать параметр RotatedSystemType, который позволяет выполнить пространственный поворот опоры с помощью трех поворотов вокруг оси x, y и z. Поворот задается в радианах:
Sub test_nodal_support ()Dim iApp As RFEM5.ApplicationSet iApp = GetObject(, "RFEM5.Application")iApp.LockLicenseDim iMod As RFEM5.IModel3Set iMod = iApp.GetActiveModelOn Error GoTo e' получить интерфейс данных моделиDim iModData As RFEM5.IModelData2Set iModData = iMod.GetModelData' получить интерфейс узловой опорыРазмеры как в RFEM5.INodalSupportУстановите iNs = iModData.GetNodalSupport (1, AtNo)' получить данные узловой опорыРазмеры как в RFEM5.NodalSupportns = iNs.GetData' изменить данныеns.ReferenceSystem = UserDefinedSystemTypens.UserDefinedReferenceSystem.Axis1 = AxisXns.UserDefinedReferenceSystem.Axis2 = AxisYns.UserDefinedReferenceSystem.Type = RotatedSystemTypens.UserDefinedReferenceSystem.RotationAngles.X = 0ns.UserDefinedReferenceSystem.RotationAngles.Y = 0ns.UserDefinedReferenceSystem.RotationAngles.Z = 45 * 3,14159265359/180' задать данные узловой опорыiModData.PrepareModificationiNs.SetData nsiModData.FinishModificatione:If Err.Number <> 0 Then MsgBox Err.description, vbCritical, Err.SourceiMod.GetApplication.UnlockLicenseSet iMod = NothingEnd Sub
Программа берет существующую узловую опору из текущей открытой модели и модифицирует ее. Поскольку пользовательская система координат не является прямой частью интерфейса INodalSupport узловой опоры, то поворот, конечно же, можно передать при создании узловой опоры.
В составных конструкциях играют температурные нагрузки довольно важную роль, поэтому следует различать загружения от потепления сверху (из-за бетонирования) и потепления снизу. Поскольку в данном случае необходимо указать изменение температуры, определяется нагрузка как Delta T. Составная балка часто моделируется в виде эксцентрического стержня, соединенного с поверхностью, поэтому разница температур должна быть разделена между этими двумя элементами (поверхностью и стержнем).
Нагрузка на стержень затем определяется как нагрузка на стержень с разницей температур, умноженная на высоту стержня и деленная общей высотой составного сечения ($\triangle T\times\frac{h_s}{h_g}$). Только не забудьте, что если верхние волокна стержня холоднее, чем нижние, то значение должно быть задано как отрицательное.
На поверхность потом применяется оставшаяся разница температур. Всегда очень важно определить температуру стержня на поверхности как Tc, а недостающую температуру затем задать на поверхности как delta T.
Чтобы изменить существующий элемент, вам нужно получить интерфейс для соответствующего элемента, в данном случае на примере стержня:
Dim iModel As RSTAB8.modelУстановите iModel = GetObject (, "RSTAB8.Model") iModel.GetApplication.LockLicense Dim iModData As IModelDataУстановите iModData = iModel.GetModelData Dim iMem As RSTAB8.IMemberSet iMem = iModData.GetMember(1, AtNo)
Используйте этот код, чтобы получить интерфейс для стержня 1, который уже должен быть создан. Затем можно использовать метод интерфейса .GetData () для получения данных об элементах.
Если вы хотите изменить данные (например, поворот стержня), вы можете впоследствии передать их в программу в блоке Prepare-/FinishModification с помощью метода .SetData ().
Dim mem As RSTAB8.Membermem = iMem.GetData mem.Rotation.Angle = 0,5mem.Rotation.Type = RSTAB8.Angle iModData.PrepareModificationiMem.SetData memiModData.FinishModification