Exemplo n.º 1
0
        public override void Store(IntPtr proc, int parIndex)
        {
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.GetInputTuple(proc, parIndex, out tuple));
            this.StoreData(proc, tuple);
        }
Exemplo n.º 2
0
        public static void StoreIP(IntPtr proc, int parIndex, IntPtr intPtrValue)
        {
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.CreateInputTuple(proc, parIndex, 1, out tuple));
            HalconAPI.SetIP(tuple, 0, intPtrValue);
        }
Exemplo n.º 3
0
        public static void StoreD(IntPtr proc, int parIndex, double doubleValue)
        {
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.CreateInputTuple(proc, parIndex, 1, out tuple));
            HalconAPI.SetD(tuple, 0, doubleValue);
        }
Exemplo n.º 4
0
        public virtual void Store(IntPtr proc, int parIndex)
        {
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.CreateInputTuple(proc, parIndex, this.iLength, out tuple));
            this.StoreData(proc, tuple);
        }
Exemplo n.º 5
0
        public static void StoreL(IntPtr proc, int parIndex, long longValue)
        {
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.CreateInputTuple(proc, parIndex, 1, out tuple));
            HalconAPI.SetL(tuple, 0, longValue);
        }
Exemplo n.º 6
0
 protected override void StoreData(IntPtr proc, IntPtr tuple)
 {
     for (int index = 0; index < this.iLength; ++index)
     {
         HalconAPI.HCkP(proc, HalconAPI.SetS(tuple, index, this.s[index]));
     }
 }
Exemplo n.º 7
0
        internal static void ClearObject(IntPtr key)
        {
            IntPtr proc = HalconAPI.PreCall(585);

            HalconAPI.HCkP(proc, HalconAPI.SetInputObject(proc, 1, key));
            int procResult = HalconAPI.CallProcedure(proc);

            HalconAPI.PostCall(proc, procResult);
        }
Exemplo n.º 8
0
        public static void StoreS(IntPtr proc, int parIndex, string stringValue)
        {
            if (stringValue == null)
            {
                stringValue = "";
            }
            IntPtr tuple;

            HalconAPI.HCkP(proc, HalconAPI.CreateInputTuple(proc, parIndex, 1, out tuple));
            HalconAPI.HCkP(proc, HalconAPI.SetS(tuple, 0, stringValue));
        }
Exemplo n.º 9
0
 protected override void StoreData(IntPtr proc, IntPtr tuple)
 {
     this.PinTuple();
     if (HalconAPI.isPlatform64)
     {
         HalconAPI.HCkP(proc, HalconAPI.CreateElements(tuple, this.Length));
         for (int index = 0; index < this.Length; ++index)
         {
             HalconAPI.SetI(tuple, index, this.i[index]);
         }
     }
     else
     {
         HalconAPI.SetIArrPtr(tuple, this.i, this.iLength);
     }
 }
Exemplo n.º 10
0
        internal static IntPtr CopyObject(IntPtr key)
        {
            IntPtr proc = HalconAPI.PreCall(583);

            HalconAPI.HCkP(proc, HalconAPI.SetInputObject(proc, 1, key));
            HalconAPI.StoreI(proc, 0, 1);
            HalconAPI.StoreI(proc, 1, -1);
            int num = HalconAPI.CallProcedure(proc);

            if (!HalconAPI.IsFailure(num))
            {
                num = HalconAPI.GetOutputObject(proc, 1, out key);
            }
            HalconAPI.PostCall(proc, num);
            return(key);
        }
Exemplo n.º 11
0
        internal static string GetObjClass(IntPtr key)
        {
            HTuple tuple = (HTuple)"object";
            IntPtr proc  = HalconAPI.PreCall(594);

            HalconAPI.HCkP(proc, HalconAPI.SetInputObject(proc, 1, key));
            HalconAPI.InitOCT(proc, 0);
            int num = HalconAPI.CallProcedure(proc);

            if (!HalconAPI.IsFailure(num))
            {
                num = HTuple.LoadNew(proc, 0, num, out tuple);
            }
            HalconAPI.PostCall(proc, num);
            if (tuple.Length <= 0)
            {
                return("any");
            }
            return(tuple.S);
        }
Exemplo n.º 12
0
        protected override void StoreData(IntPtr proc, IntPtr tuple)
        {
            for (int index = 0; index < this.iLength; ++index)
            {
                switch (HTupleImplementation.GetObjectType(this.o[index]))
                {
                case 1:
                    HalconAPI.HCkP(proc, HalconAPI.SetI(tuple, index, (int)this.o[index]));
                    break;

                case 2:
                    HalconAPI.HCkP(proc, HalconAPI.SetD(tuple, index, (double)this.o[index]));
                    break;

                case 4:
                    HalconAPI.HCkP(proc, HalconAPI.SetS(tuple, index, (string)this.o[index]));
                    break;

                case 129:
                    HalconAPI.HCkP(proc, HalconAPI.SetL(tuple, index, (long)this.o[index]));
                    break;
                }
            }
        }
Exemplo n.º 13
0
 internal void Store(IntPtr proc, int parIndex)
 {
     HalconAPI.HCkP(proc, HalconAPI.SetInputObject(proc, parIndex, this.key));
 }