Topic: P/Invoke acedNEntSelPEx, ie select modelspace entity from paperspace

[It's Alive!]

resbuf **_buffer perhaps???

Nice work as always Daniel.

<edit> or even IntPtr ptr(*_buffer);??

Tried them, even tried &*_buffer, but it would throw an exception.  Probably why it’s undocumented 

[It's Alive!]

thanks a million Daniel... and to think that i was going to try and do that
...
every now and then i get the following error:

You’re Welcome.
I got that exception too,  I’ll goof around with it a little more and see if I can’t find out why   

[It's Alive!]

give this a try

Code: [Select]

   bool Utilities::NEntSelPEx
    (
    String^ prompt,
    [Out]ObjectId %objectid,
    Point3d %point,
    int pickflag,
    [Out]Matrix3d %matrix,
    [Out]ResultBuffer ^%buffer,
    unsigned int transSpaceFlag,
    int %gsmarker
    )
  {
    CString _prompt(prompt);
    ads_name _name;
    ads_point _point = {point.X,point.Y,point.Z};
    ads_matrix _matrix;
    resbuf *_buffer = NULL;
    int _gsmarker = gsmarker;

    if(acedNEntSelPEx(_prompt,_name,_point,pickflag,_matrix,&_buffer,transSpaceFlag,&_gsmarker) == RTNORM)
    {

      objectid = ObjectId(_name[0]);
      point = Point3d(_point[0],_point[1],_point[2]);

      array<double> ^_tmparray = gcnew array<double>(16)
      {
        _matrix[0][0],_matrix[0][1],_matrix[0][2],_matrix[0][3],
        _matrix[1][0],_matrix[1][1],_matrix[1][2],_matrix[1][3],
        _matrix[2][0],_matrix[2][1],_matrix[2][2],_matrix[2][3],
        _matrix[3][0],_matrix[3][1],_matrix[3][2],_matrix[3][3]
      };

      matrix = Matrix3d(_tmparray);

      if(_buffer != NULL)
      {
        IntPtr ptr(_buffer);
        buffer = (ResultBuffer^)DisposableWrapper::Create(ResultBuffer::typeid, ptr, true);
      }
      gsmarker = _gsmarker;
      return true;
    }
    else
    {
      return false;
    }
  }


Code: [Select]

   [CommandMethod("doit")]
    public void doit()
    {
      Editor ed = AcAp.Application.DocumentManager.MdiActiveDocument.Editor;

      string prompt = "select object";
      ObjectId id;
      Point3d point;
      int pickflag = 0;
      Matrix3d matrix;
      ResultBuffer buff;
      uint transSpaceFlag = Convert.ToUInt32(AcAp.Application.GetSystemVariable("CVPORT"));
      int marker = -1;

      try
      {
        if (AcMgdWrprs.Utilities.NEntSelPEx(prompt,
                                         out id,
                                         ref point,
                                         pickflag,
                                         out matrix,
                                         out buff,
                                         transSpaceFlag,
                                         ref marker) == true)
        {
          //
          ed.WriteMessage("\nObjectId: " + id.ToString());
          ed.WriteMessage("\nPoint3d:  " + point.ToString());
          ed.WriteMessage("\nMatrix3d: " + matrix.ToString());
          ed.WriteMessage("\nmarker:   " + marker.ToString());

          if (buff != null)
          {
            ed.WriteMessage("\nBuffer:   " + marker.ToString());
            foreach (TypedValue e in buff)
            {
              ed.WriteMessage(e.ToString());
            }
          }
        }
      }
      catch(System.Exception ex)
      {
        ed.WriteMessage(ex.Message);
        ed.WriteMessage(ex.StackTrace);
      }
    }


[Chumplybum]

tried it, and it works a treat

thanks heaps


Cheers

Mark

[It's Alive!]

tried it, and it works a treat

thanks heaps


Cheers

Mark

Great, Glad it works 

[It's Alive!]

FYI, Tony posted how to p/invoke acedNEntSelPEx here
http://discussion.autodesk.com/thread.jspa?messageID=5928092&#5928092

[ahlzl]

FYI, Tony posted how to p/invoke acedNEntSelPEx here
http://discussion.autodesk.com/thread.jspa?messageID=5928092&#5928092

Daniel, I run the code, but fail.
are you OK?

[It's Alive!]

I'm doing just dandy, I had a nice Ribeye of Yak and a baked patato for dinner. 
What code are you having problems with, Mine or Tony's? What cad version are you using? Are you getting an error message?

[ahlzl]

thanks，Daniel.

I run this code, fail! VS2008 + AutoCAD 2009

Code: [Select]

using System;
using System.Runtime.InteropServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;

namespace Namespace1
{
    public static class NestedPickSample
    {
        [CommandMethod("NESTEDPICKTEST")]
        public static void acedNEntSelPExTest()
        {
            Int64 adsname = 0;
            Point3d picked;
            Matrix3d xform;
            IntPtr resbuf = IntPtr.Zero;
            int gsmarker = 0;
            int result = acedNEntSelPEx("Pick something:", out adsname,
            out picked, 0, out xform, out resbuf, 0, out gsmarker);

            if (result == 5100)
            {
                Prompt("Success: ");

                // Dump contents of resultbuffer:

                ResultBuffer buffer = (ResultBuffer)DisposableWrapper.Create(
                typeof(ResultBuffer), resbuf, true);
                int i = 0;
                foreach (TypedValue v in buffer)
                    Prompt("element[{0}]: ({1} {2})",
                    i++, v.TypeCode, v.Value.ToString());

                buffer.Dispose();
            }
            Console.Write(0);
        }

        private static void Prompt(string msg, params object[] args)
        {
            Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager
            .MdiActiveDocument.Editor.WriteMessage(msg, args);
        }

        // This may get mangled by this crappy news server:
        [DllImport("acad.exe",
        EntryPoint = "?acedNEntSelPEx@@YAHPB_WQAJQANHQAY03NPAPAUresbuf@@IPAH@Z",
        CallingConvention = CallingConvention.Cdecl, CharSet = CharSet.Unicode)]

        extern static int acedNEntSelPEx(string prompt,  
        out Int64 adsname,
        out Point3d picked,
        int pickflag,
        out Matrix3d transform,
        out IntPtr resbuf,
        uint transSpaceFlag,
        out int gsMarker);
    }
}


[It's Alive!]

Just a guess, you might need to test to see if resbuf == IntPtr.Zero before creating ResultBuffer buffer

[ahlzl]

Just a guess, you might need to test to see if resbuf == IntPtr.Zero before creating ResultBuffer buffer

success!
thanks Daniel again!

[ahlzl]

I run Daniel's code for acedNEntSelPEx, OK.
I run Tony's code for acedNEntSelPEx, OK.

but how to get objectid?

Daniel's code:
ed.WriteMessage("\nObjectId: " + id.ToString());  OK!


Tony's code:
int result = acedNEntSelPEx("\nPick something:", out adsname, out picked, 0, out xform, out resbuf, 0, out gsmarker);

adsname is Int64, is not Int64[], how get objectid from the adsname?  thanks!

[It's Alive!]

Try this code, I did not have a chance to test it

Code: [Select]

using System;
using System.Runtime.InteropServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;
using Autodesk.AutoCAD.Runtime;

namespace Namespace1
{
    public static class NestedPickSample
    {
        [CommandMethod("doit")]
        public static void acedNEntSelPExTest()
        {
            ObjectId id = new ObjectId();
            long[] adsname = {0,0};
            Point3d picked;
            Matrix3d xform;
            IntPtr resbuf = IntPtr.Zero;
            int gsmarker = 0;
            int result = acedNEntSelPEx("Pick something:",adsname,
            out picked, 0, out xform, out resbuf, 0, out gsmarker);

            if (result == 5100)
            {
                if (resbuf != IntPtr.Zero)
                {
                    ResultBuffer buffer = (ResultBuffer)DisposableWrapper.Create(
                    typeof(ResultBuffer), resbuf, true);
                    int i = 0;
                    foreach (TypedValue v in buffer)
                        Prompt("element[{0}]: ({1} {2})",
                        i++, v.TypeCode, v.Value.ToString());

                    buffer.Dispose();
                }
                acdbGetObjectId(ref id, adsname);
                Prompt("\nId{0}",id);
            }
        }

        private static void Prompt(string msg, params object[] args)
        {
            Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager
            .MdiActiveDocument.Editor.WriteMessage(msg, args);
        }

        [DllImport("acdb17.dll", CallingConvention = CallingConvention.Cdecl)]
        private static extern int acdbGetObjectId(ref ObjectId objId, long[] name);   

        [DllImport("acad.exe",
        EntryPoint = "?acedNEntSelPEx@@YAHPB_WQAJQANHQAY03NPAPAUresbuf@@IPAH@Z",
        CallingConvention = CallingConvention.Cdecl, CharSet = CharSet.Unicode)]

        extern static int acedNEntSelPEx(string prompt,
        long[] adsname,
        out Point3d picked,
        int pickflag,
        out Matrix3d transform,
        out IntPtr resbuf,
        uint transSpaceFlag,
        out int gsMarker);
    }
}



[ahlzl]

thank you, great Daniel!

I bethink of acdbGetObjectId, but I hidebound to long[] adsname and out Int64 adsname.

thanks again!