Interface COM em VBA | 4.2 Otimização de quadros

Processo de otimização

O objetivo é transferir apenas as barras de uma determinada secção para o dimensionamento do RF‑/STEEL EC3. No exemplo seguinte, todas as barras com a secção "IPE 300" devem ser otimizadas. Assume-se que os números de barra são conhecidos.

• Visualizador 3D | Google
• Visualizador 3D | Babylon
• Realidade virtual

Sistema

A otimização no RF-STEEL EC3 é realizada com base nas forças internas calculadas anteriormente no RFEM. Isto significa que a rigidez alterada devido a alterações da secção no módulo não são consideradas. A vantagem é que a otimização é realizada sem recálculo da estrutura; assim, pode ser feito muito rapidamente. A desvantagem é que, devido à rigidez alterada, pode ocorrer uma redistribuição, o que também pode levar a forças internas alteradas significativamente. Assim, a secção otimizada pode ser sobrecarregada.

Para uma otimização eficiente, é útil otimizar sempre apenas algumas secções no módulo e depois transferir as novas secções para o RFEM e verificar o resultado novamente no módulo.

Ativação da otimização no RF-STEEL EC3

Para otimizar uma secção no módulo, é necessário ativar esta opção para a secção individual. Em contraste com a operação manual do programa, é impossível selecionar como realizar a otimização; só é possível selecionar se a otimização deve ser realizada. Para ativar esta opção, as secções devem ser procuradas de acordo com a descrição. Como alternativa, é claro que também pode procurar o número da secção. Se for encontrada uma correspondência, a respetiva secção é alterada e transferida para o módulo. Em seguida, o ciclo é interrompido, uma vez que apenas uma secção é examinada neste caso.

'Defina a otimização para a secção desejada

Escuro iStec3_cs As STEEL_EC3.CROSS_SECTION
count = iStec3Case.moGetCrossSectionsCount
Escuro crsc_ec3_idx Contanto
crsc_ec3_idx = -1

Pergunta simples – resposta rápida: i = 0 To contagem - 1
iStec3_cs = iStec3Case.moGetCrossSection (i, AT_INDEX)
If InStr (LCase (iStec3_cs.Description), LCase (crsc_desc))> 0 Então
iStec3_cs.Optimization = Verdadeiro
iStec3Case.moSetCrossSection i, AT_INDEX, iStec3_cs
crsc_ec3_idx = i
Sair para
End If
Continuar i

'Defina a otimização para a secção desejada
iStec3Case.moCalculate

Após ativar a otimização, o cálculo da caixa do módulo é iniciado.

Transferência da secção para o RFEM

A secção é transferida através do número da secção. Para tal, deve obter a interface da secção do RFEM e, em seguida, introduzir um novo TextID ou um novo identificador de secção. O RFEM reconhece o identificador e obtém a secção correspondente da biblioteca após a transferência.

'Transferir a secção para o RFEM
'Obter uma nova descrição da secção no RF-STEEL EC3
iStec3_cs = iStec3Case.moGetCrossSection (crsc_ec3_idx, AT_INDEX)

'Obter a interface da secção e as propriedades no RFEM
Escuro iCrsc As RFEM5.ICrossSection
Definir iCrsc = iModelData.GetCrossSection (crsc_no, AtNo)
Escuro crsc As RFEM5.CrossSection
crsc = iCrsc.GetData

'Alteração da secção a uma nova secção do RF-STEEL EC3
crsc.Description = ""
crsc.TextID = iStec3_cs.Description

'Transferir propriedades da secção
iModelData.PrepareModification
iCrsc.SetData crsc
iModelData.FinishModification

Resumo

Em particular, no caso de estruturas recorrentes, a opção de otimização no RF-/STEEL EC3 oferece uma excelente facilitação do trabalho. É importante verificar a estrutura com as secções otimizadas através de um novo cálculo no RFEM. Um processo iterativo seria facilmente viável utilizando a interface COM. Desta forma, a otimização automática pode facilitar e acelerar significativamente o fluxo de trabalho.