1 2{$IFDEF read_forward_definitions} 3{$ENDIF} 4 5{$IFDEF read_interface_types} 6type 7 PGtkFileChooserEmbed = pointer; 8 PPGtkFileChooserEmbed = ^PGtkFileChooserEmbed; 9 10 PGtkFileChooserEmbedIface = ^TGtkFileChooserEmbedIface; 11 TGtkFileChooserEmbedIface = record 12 base_iface : TGTypeInterface; 13 { Methods } 14 get_default_size : procedure (chooser_embed:PGtkFileChooserEmbed; default_width:Pgint; default_height:Pgint);cdecl; 15 get_resizable_hints : procedure (chooser_embed:PGtkFileChooserEmbed; resize_horizontally:Pgboolean; resize_vertically:Pgboolean); 16 { Signals } 17 should_respond : function (chooser_embed:PGtkFileChooserEmbed):gboolean; 18 default_size_changed : procedure (chooser_embed:PGtkFileChooserEmbed); 19 end; 20 21{$ENDIF} {types} 22 23{$IFDEF read_interface_rest} 24 25function GTK_TYPE_FILE_CHOOSER_EMBED : GType; 26 27function GTK_FILE_CHOOSER_EMBED(obj : pointer) : PGtkFileChooserEmbed; 28 29function GTK_IS_FILE_CHOOSER_EMBED(obj : pointer) : gboolean; 30 31function GTK_FILE_CHOOSER_EMBED_GET_IFACE(obj : pointer) : PGtkFileChooserEmbedIface; 32 33 34 35function _gtk_file_chooser_embed_get_type:GType;cdecl;external gtklib name '_gtk_file_chooser_embed_get_type'; 36procedure _gtk_file_chooser_embed_get_default_size(chooser_embed:PGtkFileChooserEmbed; default_width:Pgint; default_height:Pgint);cdecl;external gtklib name '_gtk_file_chooser_embed_get_default_size'; 37procedure _gtk_file_chooser_embed_get_resizable_hints(chooser_embed:PGtkFileChooserEmbed; resize_horizontally:Pgboolean; resize_vertically:Pgboolean);cdecl;external gtklib name '_gtk_file_chooser_embed_get_resizable_hints'; 38function _gtk_file_chooser_embed_should_respond(chooser_embed:PGtkFileChooserEmbed):gboolean;cdecl;external gtklib name '_gtk_file_chooser_embed_should_respond'; 39procedure _gtk_file_chooser_embed_delegate_iface_init(iface:PGtkFileChooserEmbedIface);cdecl;external gtklib name '_gtk_file_chooser_embed_delegate_iface_init'; 40procedure _gtk_file_chooser_embed_set_delegate(receiver:PGtkFileChooserEmbed; delegate:PGtkFileChooserEmbed);cdecl;external gtklib name '_gtk_file_chooser_embed_set_delegate'; 41{$endif} {read_interface_rest} 42 43{************************************************} 44 45{$IFDEF read_implementation} 46 47function GTK_TYPE_FILE_CHOOSER_EMBED : GType; 48 begin 49 GTK_TYPE_FILE_CHOOSER_EMBED:=_gtk_file_chooser_embed_get_type; 50 end; 51 52 53function GTK_FILE_CHOOSER_EMBED(obj : pointer) : PGtkFileChooserEmbed; 54begin 55 GTK_FILE_CHOOSER_EMBED:=G_TYPE_CHECK_INSTANCE_CAST(obj,GTK_TYPE_FILE_CHOOSER_EMBED); 56end; 57 58function GTK_IS_FILE_CHOOSER_EMBED(obj : pointer) : gboolean; 59begin 60 GTK_IS_FILE_CHOOSER_EMBED:=G_TYPE_CHECK_INSTANCE_TYPE(obj,GTK_TYPE_FILE_CHOOSER_EMBED); 61end; 62 63function GTK_FILE_CHOOSER_EMBED_GET_IFACE(obj : pointer) : PGtkFileChooserEmbedIface; 64begin 65 GTK_FILE_CHOOSER_EMBED_GET_IFACE:=G_TYPE_INSTANCE_GET_INTERFACE(obj,GTK_TYPE_FILE_CHOOSER_EMBED); 66end; 67 68{$ENDIF} {read_implementation} 69