forcing rhino to wait for a process to finish in the new VB component

I am updating a legacy VB component. The legacy component used the following rhutil. work around to avoid the rhino error window from appearing after 20 seconds by having rhino wait until the process ended:

Dim proc As System.Diagnostics.Process = System.Diagnostics.Process.Start(the_program)
      While proc.HasExited = False
        Rhutil.RhinoApp().Wait(100)
      End While
        proc.WaitForExit()
      proc.Close()

Anyone know a similar work around in the rhinoCommons VB?
Jeff

Replies to This Discussion

Permalink Reply by David Rutten on August 15, 2010 at 3:13pm

RhinoApp in RhinoCommon also has a Wait() method. It doesn't allow you to specify a 100 ms delay, but it will clear the message pump.

You can also try to pause the thread you're on:

Threading.Thread.CurrentThread.Sleep(100)

--
David Rutten
david@mcneel.com
Poprad, Slovakia

Permalink Reply by Jinge Chai on October 13, 2010 at 10:44am