class gui : unit ->
object
.. end
val mutable db : Dbf_sql.SQL_db.db
val mutable current_column_model : Dbf_dbStores.column_store
val mutable saved : bool
val mutable filename : string option
method vbox : GPack.box
method reparent : GObj.widget -> unit
method private _do_quit : bool
method private _check_saved : bool
method private _set_column_model : Dbf_dbStores.column_store -> unit
method private _get_selection : ((Gtk.tree_path * Dbf_dbStores.table_data) *
(Gtk.tree_path * Dbf_sql.SQL_db.column) option)
option
method private _update_display : unit
method open_file : string -> unit
method private _cb__quit : unit -> unit
method private _cb__new : unit -> unit
method private _cb__open : unit -> unit
method private _cb__save : unit -> unit
method private _cb__save_as : unit -> unit
method private _cb__table_selection_changed : unit -> unit
method private _document_changed : unit -> unit
method private _cb__add_table : unit -> unit
method private _cb__add_vtable : unit -> unit
method private _cb__add_column : unit -> unit
method private _cb__add_index : unit -> unit
method private _check_gui_query : QGUI.query_gui_input -> unit
method private _cb__add_query : unit -> unit
method private _cb__remove_table : unit -> unit
method private _cb__remove_vtable : unit -> unit
method private _cb__remove_column : unit -> unit
method private _cb__remove_index : unit -> unit
method private _cb__remove_query : unit -> unit
method private _cb__edit_table : unit -> unit
method private _cb__edit_column : unit -> unit
method private _cb__edit_vtable : unit -> unit
method private _cb__edit_index : unit -> unit
method private _cb__edit_query : unit -> unit
method private _table_gui_answer : TGUI.table_gui_input -> unit
method private _table_gui_update_answer : GTree.row_reference ->
Dbf_sql.SQL_db.table -> TGUI.table_gui_input -> unit
method private _column_gui_answer : CGUI.column_gui_type -> unit
method private _column_gui_update_answer : GTree.row_reference ->
Dbf_sql.SQL_db.column -> CGUI.column_gui_type -> unit
method private _vtable_gui_answer : VTGUI.vtable_gui_input -> unit
method private _vtable_gui_update_answer : GTree.row_reference ->
Dbf_sql.SQL_db.vtable -> VTGUI.vtable_gui_input -> unit
method private _index_gui_answer : IGUI.table_gui_input -> unit
method private _query_gui_answer : QGUI.query_gui_input -> unit
method private _index_gui_update_answer : GTree.row_reference ->
Dbf_sql.SQL_db.index -> IGUI.table_gui_input -> unit
method private _query_gui_update_answer : GTree.row_reference ->
Dbf_sql.SQL_db.query -> QGUI.query_gui_input -> unit
method private _add_table_internal : name:string -> comment:string -> logged:bool -> unit
method private _add_column_internal : table:Dbf_sql.SQL_db.table ->
model:Dbf_dbStores.column_store ->
name:string ->
comment:string ->
ty:Dbf_sql.SQL_db.ty ->
?nullable:bool ->
?ocaml_type:string ->
?sql2ml:string ->
?ml2sql:string ->
?options:string list Dbf_misc.StringMap.t ->
?spec_ty:string Dbf_misc.StringMap.t -> unit -> unit
method private _remove_table_internal : Gtk.tree_path -> unit
method private _update_table_internal : GTree.row_reference ->
Dbf_sql.SQL_db.table ->
?name:string ->
comment:string ->
logged:bool -> pkey:Dbf_sql.SQL_db.column list -> unit -> unit
method private _update_column_internal : GTree.row_reference ->
Dbf_sql.SQL_db.column ->
name:string option ->
comment:string ->
ty:Dbf_sql.SQL_db.ty ->
nullable:bool ->
options:string list Dbf_misc.StringMap.t ->
spec_ty:string Dbf_misc.StringMap.t ->
ocaml_type:string -> sql2ml:string -> ml2sql:string -> unit -> unit
method private _remove_vtable_from_store : string -> unit
method private _remove_index_from_store : string -> unit
method save : string -> unit
method save_current : unit
method clear : unit -> unit