The filtered-table-view class is derived from table-view with a custom
render-object-view-impl method that is basically table-view's method
with a conditional in the mapc lambda that only applies
with-table-view-body-row for the rows that should display.
The following methods are basically to see what's going on:
(defmethod with-table-view-body-row ((view filtered-table-view) obj
widget &rest args)
(format t "w-t-v-b-r ~A~%" (slot-value obj 'name))
(call-next-method))
(defmethod render-table-view-body-row ((view filtered-table-view) obj
widget &rest args)
(format t "r-t-v-b-r ~A~%" (slot-value obj 'name))
(call-next-method))
And the filtered-datagrid widget inherits from datagrid. It's only
custom method is a copy of the dataseq-view for datagrid. I'm not
actually sure I need this part at all.
The *-table-view-body-row methods are getting called and the output
looks correct except no rows, or headers are being displayed I just
get the "(Total of ~A ~A)" summary followed by a horizontal grey bar.
So I'm looking for ideas or alternative solutions to this problem.
Thanks,
Ron