Sqlite Autocad < AUTHENTIC >

;; Extract attributes (setq idx 0) (repeat (sslength ss) (setq ent (ssname ss idx)) (setq att_list (get_attributes ent)) (foreach att att_list (sqlite:exec db (strcat "INSERT INTO attributes VALUES ('" (vla-get-effectivename (vlax-ename->vla-object ent)) "','" (car att) "','" (cdr att) "')"))) (setq idx (1+ idx)) )

# Add data for row_idx, row in enumerate(data, start=1): for col_idx, value in enumerate(row): table.SetText(row_idx, col_idx, str(value)) sqlite autocad

# Add headers for i, header in enumerate(headers): table.SetText(0, i, str(header)) table.SetCellTextHeight(0, i, 2.5) ;; Extract attributes (setq idx 0) (repeat (sslength