method insert_item item = let row = store#append () in store#set ~row ~column: col_data item; self#display_item row item