topic Re: Run Code in the background without exiting a form in Inventor Programming Forum

Run Code in the background without exiting a form

dialunau — Thu, 21 Jul 2022 16:10:45 GMT

Hello
I have a form and I want to run the code for (MsgBox) whenever I click the button in my form (so I will see 2 messages whenever I click the button).
The problem is that it will show only after I close the form. How can I do this?
My code looks like this:

Imports System.ComponentModel Imports System.Drawing Imports System.Windows.Forms Public Sub Main() Dim oForm As New WinForm(iLogicVb.Automation) oForm.ShowDialog() MsgBox("TASK 2") End Sub Public Class WinForm Inherits System.Windows.Forms.Form Public Sub New(ByVal Iinf As IiLogicAutomation) oForm = Me With oForm .FormBorderStyle = FormBorderStyle.FixedToolWindow .StartPosition = FormStartPosition.CenterScreen .Width = 300 .Height = 400 .Text = "MYFORM" .ShowInTaskbar = False End With Dim oButton1 As New Button() With oButton1 .Text = "CLICK ME!" .Top = oForm.Bottom - 80 .Left = (oForm.Width/2) - oButton1.Width .Enabled = True .AutoSize = True End With Me.Controls.Add(oButton1) AddHandler oButton1.Click, AddressOf oButton1_Click End Sub Public Sub oButton1_Click(ByVal oSender As System.Object, ByVal oEventArgs As System.EventArgs) MsgBox("TASK 1") End Sub End Class

Thank you.

Re: Run Code in the background without exiting a form

JelteDeJong — Thu, 21 Jul 2022 21:14:16 GMT

use oForm.Show() in stead of oForm.ShowDialog()

Public Sub Main()
	Dim oForm As New WinForm(iLogicVb.Automation)
	oForm.Show()
	
	MsgBox("TASK 2")
End Sub

Re: Run Code in the background without exiting a form

bradeneuropeArthur — Fri, 22 Jul 2022 06:26:23 GMT

Modal vs Modeless forms!

Re: Run Code in the background without exiting a form

dlunaEVTVX — Fri, 22 Jul 2022 14:33:34 GMT

Re: Run Code in the background without exiting a form

dialunau — Fri, 22 Jul 2022 14:34:16 GMT

Hello all,

I'm sorry I didn't explain properly. I want my code to show the 2 MsgBoxes whenever I click the button, so the form calls the main function to execute that code when the button is clicked.

I tried with oForm.Show, but it causes the code to run before starting the form. On the other hand, oForm.Show(vbModeless) causes the second message to show after closing the form, so none of these attempts gave me the desired result.

How can I call a portion of the main function from the "oButton_click" event inside the class?

Re: Run Code in the background without exiting a form

Michael.Navara — Mon, 25 Jul 2022 06:40:53 GMT

The easiest way for execution of background task is BackgroundWorker. There are two samples how to use them.

Re: Run Code in the background without exiting a form

dialunau — Wed, 27 Jul 2022 19:56:47 GMT

I tried the backgroungworker but it won't work in this scenario. I'll explain more detail.
I want my code to change an iProperty when I click a button, I cannot change the iProperties inside the form (I tried using IiProperties but it gives errors), that is why I must change them from the main function.

The problem is that I can only run code in the main function before or after running the form, but I want that iProperty to change whenever I click the button, not after the form is closed.

Imports System.Windows.Forms Public Sub Main() Dim oForm As New WinForm() oForm.ShowDialog ' oForm.Show(vbModeless) ' I want to change this iProperty when I click the button iProperties.Value("Y.ipt", "Project", "Part Number") = "2" ThisDoc.Document.Update End Sub Public Class WinForm Inherits System.Windows.Forms.Form Public Sub New() oForm = Me With oForm .FormBorderStyle = FormBorderStyle.FixedToolWindow .StartPosition = FormStartPosition.CenterScreen .Width = 300 .Height = 400 .Text = "MYFORM" .ShowInTaskbar = False End With Dim oButton1 As New Button() With oButton1 .Text = "Change iProperty" .Top = oForm.Bottom - 80 .Left = (oForm.Width/2) - oButton1.Width .Enabled = True .AutoSize = True End With Me.Controls.Add(oButton1) AddHandler oButton1.Click, AddressOf oButton1_Click End Sub Public Sub oButton1_Click(ByVal oSender As System.Object, ByVal oEventArgs As System.EventArgs) 'When clicking the button, I want the program to run the iProperties change in the main function End Sub End Class

I've been trying various methods to access the main function without exiting the form, but no luck so far.

Re: Run Code in the background without exiting a form

JelteDeJong — Wed, 27 Jul 2022 20:30:17 GMT

you can change iProperies from the form. The only thing is that you cant use the iLogic API. You need to use the Inventor API. Try this:

Imports System.Windows.Forms Public Sub Main() Dim partDocument As PartDocument = ThisDoc.Document Dim oForm As New WinForm(partDocument) oForm.ShowDialog() End Sub Public Class WinForm Inherits System.Windows.Forms.Form Private _doc As PartDocument Public Sub New(doc As PartDocument) _doc = doc Dim oForm = Me With oForm .FormBorderStyle = FormBorderStyle.FixedToolWindow .StartPosition = FormStartPosition.CenterScreen .Width = 300 .Height = 400 .Text = "MYFORM" .ShowInTaskbar = False End With Dim oButton1 As New Button() With oButton1 .Text = "CLICK ME!" .Top = oForm.Bottom - 80 .Left = (oForm.Width / 2) - oButton1.Width .Enabled = True .AutoSize = True End With Me.Controls.Add(oButton1) AddHandler oButton1.Click, AddressOf oButton1_Click End Sub Public Sub oButton1_Click(ByVal oSender As System.Object, ByVal oEventArgs As System.EventArgs) ' for more info check https://modthemachine.typepad.com/my_weblog/2010/02/accessing-iproperties.html Dim propertySet As PropertySet = _doc.PropertySets.Item("Design Tracking Properties") Dim myProperty As [Property] = propertySet.Item("Description") myProperty.Value = "I have been updated from the form!" msgbox("Description property has been updated!") End Sub End Class

Re: Run Code in the background without exiting a form

dialunau — Fri, 05 Aug 2022 14:25:05 GMT

That worked perfectly.
modifying the property sets instead of using the iproperties.value method helped me modify them without exiting the class.

Thank you.