How can I use Grasshoper externally ?

Replies to This Discussion

Permalink Reply by David Rutten on March 12, 2012 at 4:41pm

Hi Tanir,

Grasshopper exposes some functions via the RhinoScript language, but that hasn't been documented properly yet. Would this be sufficient for your needs?

You could also write a GHA file which hooks into Grasshopper, you could then communicate with this instance via WCF, but I've only ever written one WCF app, so this may not be a useful suggestion.

--

David Rutten

david@mcneel.com

Poprad, Slovakia

Permalink Reply by Tamir Levy on March 14, 2012 at 2:01am

"Grasshopper exposes some functions via the RhinoScript language, but that hasn't been documented properly yet. Would this be sufficient for your needs?"

Yes, that will be great :)

I also saw your following response to the post "Open a .gh automatically" of the February 14 :

Hi Manuel,

Grasshopper exposes a RhinoScript interface. The following methods are available:

IsEditorLoaded()
IsEditorVisible()
LoadEditor()
ShowEditor()
HideEditor()
EnableBanner()
DisableBanner()
IsSolverEnabled()
EnableSolver()
DisableSolver()
RunSolver(expireAll As Boolean)
OpenDocument(fileName As String)
CloseDocument()
CloseAllDocuments()
SaveDocument()
SaveDocumentAs(fileName As String)
AssignDataToParameter(parameterID As String, data As Object)
BakeDataInObject(objectID As String)

Please, please please could you put a small demo - just how to use "OpenDocument". I believe I could take it from there.

Permalink Reply by David Rutten on March 14, 2012 at 4:56am

The RhinoScript could look like this:

Option Explicit

Call Main()

Sub Main()

  Dim GH : Set GH = Rhino.GetPluginObject("Grasshopper")

  GH.OpenDocument("C:\Users\User\Desktop\ExampleFile.gh")

  Set GH = Nothing

End Sub

--

David Rutten

david@mcneel.com

Poprad, Slovakia

Permalink Reply by Giulio Piacentino on March 14, 2012 at 5:40am

Hi Tanir

this is C# 4.0 to connect via COM, same as what David mentions:

var type = Type.GetTypeFromProgID("Rhino5.Application", true);
//http://www.rhino3d.com/5/rhinoscript/introduction/external_access.htm

dynamic rhinoComObj = Activator.CreateInstance(type);
rhinoComObj.Visible = true;

while (rhinoComObj.IsInitialized() == 0) Thread.Sleep(100);

rhinoComObj.RunScript("_Grasshopper", 0);
var gh = rhinoComObj.GetPlugInObject("b45a29b1-4343-4035-989e-044e8580d9cf", "00000000-0000-0000-0000-000000000000") as dynamic;

gh.OpenDocument(@"C:\Users\User\Desktop\ExampleFile.gh");

Thanks,

- Giulio
______________
giulio@mcneel.com

Permalink Reply by Tamir Levy on March 15, 2012 at 2:55am

Thanx thanx thanx :)

Permalink Reply by Rémy Maurcot on April 30, 2012 at 11:50am

Giulio it is possible in VB ? with Visual Studio 2010 and your class assembly wizard.

Thanks

Permalink Reply by Giulio Piacentino on May 1, 2012 at 10:43am

Hi,

yes, it should be possible. This is in Vb.Net translated with developefusion's tools and a couple of small fixes --- but I'd suggest not to call this in SolveInstance. Please review well in advance where this code will run and triggered by what other code.

Also see that other discussion you started here.

Dim type1 = Type.GetTypeFromProgID("Rhino5.Application", True)
'http://www.rhino3d.com/5/rhinoscript/introduction/external_access.htm

Dim rhinoComObj As Object = Activator.CreateInstance(type1)
rhinoComObj.Visible = True

While rhinoComObj.IsInitialized() = 0
    Thread.Sleep(100)
End While

rhinoComObj.RunScript("_Grasshopper", 0)
Dim gh as Object = rhinoComObj.GetPlugInObject("b45a29b1-4343-4035-989e-044e8580d9cf", "00000000-0000-0000-0000-000000000000")

gh.OpenDocument("C:\Users\User\Desktop\ExampleFileID.gh")


Also, remember that normal objects (not MarshalByReference objects) need to be marshalled across AppDomains.

I hope this helps,

- Giulio
________________
giulio@mcneel.com

Permalink Reply by Rémy Maurcot on May 1, 2012 at 11:02am

Thanks giulio,

There in no error in VS2010 but apparently nothing happens in rhinoceros.

here my function:

        Function ExecuterDefinition(ByVal Definition As RhinoDoc, ByVal mode As RunMode) As Result
            Rhino.RhinoApp.WriteLine("* * *")
            Rhino.RhinoApp.WriteLine("")

            Dim type1 = Type.GetTypeFromProgID("Rhino5.Application", True)
            'http://www.rhino3d.com/5/rhinoscript/introduction/external_access.htm

            Dim doc1
            doc1 = "C:\Program Files (x86)\Rhinoceros 4.0\Plug-ins\RhinoDeveloppements\RhinoBridges\ghx\PCRi_x64.ghx"

            Dim rhinoComObj As Object = Activator.CreateInstance(type1)
            rhinoComObj.Visible = True

            While rhinoComObj.IsInitialized() = 0
                Thread.Sleep(100)
            End While

            rhinoComObj.RunScript("_Grasshopper", 0)
            Dim gh As Object = rhinoComObj.GetPlugInObject("b45a29b1-4343-4035-989e-044e8580d9cf", "00000000-0000-0000-0000-000000000000")

            gh.OpenDocument(doc1)

            Return Rhino.Commands.Result.Success

        End Function

Thanks

Permalink Reply by Giulio Piacentino on May 1, 2012 at 11:44am

• Did you see the link in the code?
  http://www.rhino3d.com/5/rhinoscript/introduction/external_access.htm
  Which version of Rhino do you have?
  
  
• Are you sure you do not get any error at all? Is the correct version of the plug-in being loaded?

- Giulio
________________
giulio@mcneel.com

Permalink Reply by Giulio Piacentino on May 1, 2012 at 11:12am

If you add this code in the end, and point the above path to the attached file, you can test this sample.

gh.AssignDataToParameter("9de7f85f-7c54-4b36-be8c-af9ee0cf7168", "{1,2,3}") 'This is a point parameter
gh.RunSolver(True)

Thanks,

- Giulio
________________
giulio@mcneel.com

Attachments:

• ExampleFileID.gh, 1 KB

Permalink Reply by Rémy Maurcot on May 1, 2012 at 3:50pm

Giulio, thanks for your help,

Here my command in rhp plug-in

Hi simplify function for your comprehension.

Thanks a lot

Attachments:

• RhinoBridgesPontCadre.vb, 3 KB

Permalink Reply by Giulio Piacentino on May 2, 2012 at 1:53am

Hi again

the code works here, and I need more information to understand what problem you are experiencing. Also, please, if this issue persists, would you start a new thread with the full explanation of what you are trying to do, any errors screenshots and a list of things you expect to happen?

Thanks,

- Giulio
__________________
giulio@mcneel.com

Attachments:

• RhinoBridges.zip, 37 KB
• ExampleFile.gh, 2 KB

• ‹ Previous
• 1
• 2
• Next ›
• Page