EXTRAER BLOCK DE TABLA

Ir abajo

EXTRAER BLOCK DE TABLA

Mensaje por ronaldT el Mar Mayo 01, 2018 2:11 am

Un cordial saludos amigo en un post anterior consulte el como insertar un bloque en una tabla a hora la consulta es todo lo contrario, como se puede hacer para extraer un bloque de una tabla, alguien que tenga la amabilidad de Ayudar!!

ronaldT

Mensajes : 38
Fecha de inscripción : 20/03/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por Marco Jacinto el Miér Mayo 02, 2018 6:15 pm

Copia la tabla y la explotas :-P

Del codigo que subí tendrías que hacer lo siguiente:

Código:
extraer la funcion que obtiene la celda donde haces click
checar el tipo de celda, debe ser acBlockCell
Si lo es obtener el BlockTableRecordId
Convertir el objectID al objeto bloque
Obtener el nombre del bloque
Insertar el bloque.

Marco Jacinto

Mensajes : 53
Fecha de inscripción : 12/08/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por ronaldT el Miér Mayo 02, 2018 6:38 pm

Muchas Gracias, Marco Jacinto, lo voy a intentar...

ronaldT

Mensajes : 38
Fecha de inscripción : 20/03/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por ronaldT el Dom Mayo 06, 2018 5:39 am

Muchas Gracias Marco, funcionó a la perfección la excelente recomendación...

(setq aDoc (vlax-get-property (vlax-get-acad-object) 'ActiveDocument))

(vla-ObjectIDToObject aDoc Id) ---- Convierte el Objeto Id a Bloque

ronaldT

Mensajes : 38
Fecha de inscripción : 20/03/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por Marco Jacinto el Lun Mayo 07, 2018 3:48 pm

Excelente, que bueno que te resulto, un buen detalle, no necesario, pero un buen detalle, sería postear aquí el resultado.

Saludos

Marco Jacinto

Mensajes : 53
Fecha de inscripción : 12/08/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por ronaldT el Lun Mayo 07, 2018 5:22 pm

Muy bien Estimado Marco
De esta manera es como lo hago
(vl-load-com)
(setq aDoc (vlax-get-property (vlax-get-acad-object) 'ActiveDocument))
(setq tabla (vlax-ename->vla-object (CAR (ENTSEL))))
(setq aObjId (vla-GetBlockTableRecordId tabla 2 0))
(setq aObj (vla-ObjectIDToObject aDoc aObjId))
(vlax-get-property aObj "Name")

Con esta rutina extraes el nombre del bloque ubicado en la Fila 2 Columna Cero

ronaldT

Mensajes : 38
Fecha de inscripción : 20/03/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por Marco Jacinto el Lun Mayo 07, 2018 6:27 pm

Checa este código, hace la selección de la celda directamente en el dibujo, como lo explicaba en el pseudocódigo de arriba e inicia inmediatamente el comando insert con el bloque de la celda.

http://mcommands.blogspot.mx/2018/05/la-de-contiene-insertar-el-ellas.html

El nombre del link quedó algo raro y ya no supe como cambiarlo :-(

Saludos

Marco Jacinto

Mensajes : 53
Fecha de inscripción : 12/08/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: EXTRAER BLOCK DE TABLA

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.