1// included by gtk2.pas
2
3{
4   NOTE this widget is considered too specialized/little-used for
5   GTK+, and will in the future be moved to some other package.  If
6   your application needs this widget, feel free to use it, as the
7   widget does work and is useful in some applications; it's just not
8   of general interest. However, we are not accepting new features for
9   the widget, and it will eventually move out of the GTK+
10   distribution.
11  }
12
13{$IFDEF read_forward_definitions}
14{$ENDIF read_forward_definitions}
15
16//------------------------------------------------------------------------------
17
18{$IFDEF read_interface_types}
19   PGtkInputDialog = ^TGtkInputDialog;
20   TGtkInputDialog = record
21        dialog : TGtkDialog;
22        axis_list : PGtkWidget;
23        axis_listbox : PGtkWidget;
24        mode_optionmenu : PGtkWidget;
25        close_button : PGtkWidget;
26        save_button : PGtkWidget;
27        axis_items : array[0..(GDK_AXIS_LAST)-1] of PGtkWidget;
28        current_device : PGdkDevice;
29        keys_list : PGtkWidget;
30        keys_listbox : PGtkWidget;
31     end;
32
33{ Padding for future expansion  }
34   PGtkInputDialogClass = ^TGtkInputDialogClass;
35   TGtkInputDialogClass = record
36        parent_class : TGtkDialogClass;
37        enable_device : procedure (inputd:PGtkInputDialog; device:PGdkDevice); cdecl;
38        disable_device : procedure (inputd:PGtkInputDialog; device:PGdkDevice); cdecl;
39        _gtk_reserved1 : procedure ; cdecl;
40        _gtk_reserved2 : procedure ; cdecl;
41        _gtk_reserved3 : procedure ; cdecl;
42        _gtk_reserved4 : procedure ; cdecl;
43     end;
44
45{$ENDIF read_interface_types}
46
47//------------------------------------------------------------------------------
48
49{$IFDEF read_interface_rest}
50function GTK_TYPE_INPUT_DIALOG : GType;
51function GTK_INPUT_DIALOG(obj: pointer) : PGtkInputDialog;
52function GTK_INPUT_DIALOG_CLASS(klass: pointer) : PGtkInputDialogClass;
53function GTK_IS_INPUT_DIALOG(obj: pointer) : boolean;
54function GTK_IS_INPUT_DIALOG_CLASS(klass: pointer) : boolean;
55function GTK_INPUT_DIALOG_GET_CLASS(obj: pointer) : PGtkInputDialogClass;
56
57
58function gtk_input_dialog_get_type:TGtkType; cdecl; external gtklib;
59function gtk_input_dialog_new:PGtkWidget; cdecl; external gtklib;
60{$ENDIF read_interface_rest}
61
62//------------------------------------------------------------------------------
63
64{$IFDEF read_implementation}
65function GTK_TYPE_INPUT_DIALOG : GType;
66begin
67   GTK_TYPE_INPUT_DIALOG:=gtk_input_dialog_get_type;
68end;
69
70function GTK_INPUT_DIALOG(obj: pointer) : PGtkInputDialog;
71begin
72   GTK_INPUT_DIALOG:=PGtkInputDialog(GTK_CHECK_CAST(obj,GTK_TYPE_INPUT_DIALOG));
73end;
74
75function GTK_INPUT_DIALOG_CLASS(klass: pointer) : PGtkInputDialogClass;
76begin
77   GTK_INPUT_DIALOG_CLASS:=PGtkInputDialogClass(GTK_CHECK_CLASS_CAST(klass,GTK_TYPE_INPUT_DIALOG));
78end;
79
80function GTK_IS_INPUT_DIALOG(obj: pointer) : boolean;
81begin
82   GTK_IS_INPUT_DIALOG:=GTK_CHECK_TYPE(obj,GTK_TYPE_INPUT_DIALOG);
83end;
84
85function GTK_IS_INPUT_DIALOG_CLASS(klass: pointer) : boolean;
86begin
87   GTK_IS_INPUT_DIALOG_CLASS:=GTK_CHECK_CLASS_TYPE(klass,GTK_TYPE_INPUT_DIALOG);
88end;
89
90function GTK_INPUT_DIALOG_GET_CLASS(obj: pointer) : PGtkInputDialogClass;
91begin
92   GTK_INPUT_DIALOG_GET_CLASS:=PGtkInputDialogClass(GTK_CHECK_GET_CLASS(obj,GTK_TYPE_INPUT_DIALOG));
93end;
94{$ENDIF read_implementation}
95
96// included by gtk2.pas
97
98