Module Dbf_virtualTableGUI.DW (.ml)

module DW: Dbf_dbWidget

module WM: Dbf_gtk2Misc.WidgetMisc

type data =

`\|`	`D_Table of Dbf_sql.SQL_db.table`
`\|`	`D_Column of Dbf_sql.SQL_db.column`
`\|`	`D_String of string`

type view = {

	`sv_view : GTree.view;`
	`sv_string_c : GTree.view_column;`

}

class db_list_store : unit -> object .. end

class db_widget : Gtk.Tags.selection_mode -> object .. end

val db_chooser : Dbf_sql.SQL_db.table list ->
       Gtk.Tags.selection_mode -> Dbf_sql.SQL_db.column list