Index: main/grid/data-wrapper.lisp
===================================================================
--- main/grid/data-wrapper.lisp	(revision main,69)
+++ main/grid/data-wrapper.lisp	(revision main,69)
@@ -0,0 +1,27 @@
+(in-package #:grid)
+
+
+
+(defclass data-wrapper ()
+  ((wrapped-data :initarg :wrapped-data :accessor wrapped-data)))
+
+(defmethod rows ((dw data-wrapper))
+  (rows (wrapped-data dw)))
+
+(defmethod header-rows ((dw data-wrapper))
+  (header-rows (wrapped-data dw)))
+
+(defmethod columns ((dw data-wrapper))
+  (columns (wrapped-data dw)))
+
+(defmethod header-columns ((dw data-wrapper))
+  (header-columns (wrapped-data dw)))
+
+(defmethod column-width ((dw data-wrapper) column)
+  (column-width (wrapped-data dw) column))
+
+(defmethod item ((dw data-wrapper) row column)
+  (item (wrapped-data dw) row column))
+
+(defmethod uses-display-strings ((dw data-wrapper) row column)
+  (uses-display-strings (wrapped-data dw) row column))
Index: main/grid/package.lisp
===================================================================
--- main/grid/package.lisp	(revision main,62)
+++ main/grid/package.lisp	(revision main,69)
@@ -12,4 +12,5 @@
 
    ;; Extra
+   #:data-wrapper #:wrapped-data
    #:hash-per-row-grid-data
    #:parse-format-specs #:column-formats
Index: main/tui.asd
===================================================================
--- main/tui.asd	(revision main,60)
+++ main/tui.asd	(revision main,69)
@@ -41,4 +41,6 @@
                                      (:file "model"
                                       :depends-on ("package"))
+                                     (:file "data-wrapper"
+                                      :depends-on ("model"))
                                      (:file "hash-data"
                                       :depends-on ("model"))