Dobrý den,mám vytvořený dialog (*.dll ve Visual Studiu) propojený se součástí prostřednictvím
iLogicu v Inventoru.
Dialog slouží na editaci součásti.
Lze do dialogu doplnit i možnost vybrat materiál součásti (ComboBox),nebo některé iVlastnosti?
Poradíte mě jak?
Dialog vytvořený v iLogicu má omezené možnosti použití.

Děkuji Popelka

Dobrý den,
děkuji za tip...

Zkouším to takto níže ,ale vyskakuje tato hláška.
Poradíte mi co je špatně ?

Děkuji Popelka

Připojené náhledy

...

Imports System.Windows.Forms
Imports Autodesk.iLogic.Interfaces

Public Class Dialog1
    Public SrazeniZavit As Double
    Public MPrumer As Double
    Public DelkaZavit As Double
    Public SRazeniValec As Double
    Public SPrumer As Double
    Public DelkaValce As Double
    Public ZaobleniUHlavy As Double
    Public iLogicVB As ILowLevelSupport
    Public iProperties As IiProperties



    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
        SrazeniZavit = TextBox1.Text
        MPrumer = TextBox2.Text
        DelkaZavit = TextBox3.Text
        SRazeniValec = TextBox4.Text
        SPrumer = TextBox5.Text
        DelkaValce = TextBox6.Text
        ZaobleniUHlavy = TextBox7.Text
        iProperties.Material = ComboBox1.Text


        Me.DialogResult = System.Windows.Forms.DialogResult.OK
        Me.Close()
    End Sub

    Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
        Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
        Me.Close()
    End Sub

    Private Sub Dialog1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.Text = SrazeniZavit
        TextBox2.Text = MPrumer
        TextBox3.Text = DelkaZavit
        TextBox4.Text = SRazeniValec
        TextBox5.Text = SPrumer
        TextBox6.Text = DelkaValce
        TextBox7.Text = ZaobleniUHlavy
        ComboBox1.Text = iProperties.Material


        For Each material In iProperties.Materials
            ComboBox1.Items.Add(material)
        Next



    End Sub

    Private Sub Label2_Click(sender As Object, e As EventArgs) Handles Label2.Click

    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

        'iProperties.Value("Design Tracking Properties", "Material") = ComboBox1.Text
        iProperties.Material = ComboBox1.Text
        ILogicVB.DocumentUpdate()

        Me.DialogResult = System.Windows.Forms.DialogResult.OK
        Me.Close()
    End Sub
End Class

---------------------------------------------------------------------------------

AddReference "iLogic Osazeny Šroub Dialog.dll"


localTrigger = iTrigger0
 Using dlg As New iLogic_Osazeny_Šroub_Dialog.Dialog1
  dlg.SrazeniZavit = SrazeniZavit
  dlg.MPrumer = MPrumer
  dlg.DelkaZavit = DelkaZavit
  dlg.SRazeniValec = SRazeniValec
  dlg.SPrumer = SPrumer
  dlg.DelkaValce = DelkaValce
  dlg.ZaobleniUHlavy = ZaobleniUHlavy
  dlg.iProperties = iProperties
  Dim i As Integer = dlg.ShowDialog()
  If i <> vbOK Then Return
  SrazeniZavit =  dlg.SrazeniZavit
  MPrumer =  dlg.MPrumer
  DelkaZavit =  dlg.DelkaZavit
  SRazeniValec =  dlg.SRazeniValec
  SPrumer =  dlg.SPrumer
  DelkaValce =  dlg.DelkaValce
  ZaobleniUHlavy = dlg.ZaobleniUHlavy
  End Using
 iLogicVb.UpdateWhenDone = True

Dobrý den,
v Dialog1 je pouze ten kód.
V součásti je v pravidle iLogic reference na dll soubor a automaticky vygenerovaný kód.
Říkáte,že kód pro Dialog1 je nekompletní - možná je to ta příčina.....

Popelka

Připojené náhledy