updated gtk3/glib etc bindings

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1998 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
drewski207 2011-09-24 01:35:47 +00:00
parent d2d5da82d1
commit 373dc382cf
14 changed files with 90 additions and 32 deletions

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Atk1;
{$MODE OBJFPC}{$H+}
@ -818,6 +819,7 @@ type
TAtkObject = object(TGObject)
description: Pgchar;
name: Pgchar;
accessible_parent1: PGObject;
role: TAtkRole;
relation_set: PAtkRelationSet;
layer: TAtkLayer;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit cairo1;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Gdk3;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit GdkPixbuf2;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Gio2;
{$MODE OBJFPC}{$H+}
@ -1295,6 +1296,7 @@ type
PPGFilterInputStream = ^PGFilterInputStream;
PGFilterInputStream = ^TGFilterInputStream;
TGFilterInputStream = object(TGInputStream)
base_stream1: PGInputStream;
function get_base_stream: PGInputStream; cdecl; inline;
function get_close_base_stream: gboolean; cdecl; inline;
procedure set_close_base_stream(close_base: gboolean); cdecl; inline;
@ -1412,6 +1414,7 @@ type
PPGFilterOutputStream = ^PGFilterOutputStream;
PGFilterOutputStream = ^TGFilterOutputStream;
TGFilterOutputStream = object(TGOutputStream)
base_stream1: PGOutputStream;
function get_base_stream: PGOutputStream; cdecl; inline;
function get_close_base_stream: gboolean; cdecl; inline;
procedure set_close_base_stream(close_base: gboolean); cdecl; inline;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit GLib2;
{$MODE OBJFPC}{$H+}
@ -1348,13 +1349,16 @@ type
PPGDateWeekday = ^PGDateWeekday;
PGDateWeekday = ^TGDateWeekday;
TGDate = object
TGDateBitfield0 = bitpacked record
julian_days: guint32 { changed from guint to accomodate 32 bitsize requirement };
julian: guint1 { changed from guint to accomodate 1 bitsize requirement };
dmy: guint1 { changed from guint to accomodate 1 bitsize requirement };
day: guint6 { changed from guint to accomodate 6 bitsize requirement };
month: guint4 { changed from guint to accomodate 4 bitsize requirement };
year: guint16 { changed from guint to accomodate 16 bitsize requirement };
end;
TGDate = object
Bitfield0 : TGDateBitfield0; { auto generated type }
function new: PGDate; cdecl; inline; static;
function new_dmy(day: TGDateDay; month: TGDateMonth; year: TGDateYear): PGDate; cdecl; inline; static;
function new_julian(julian_day: guint32): PGDate; cdecl; inline; static;
@ -1763,14 +1767,17 @@ type
PPGHookCheckMarshaller = ^PGHookCheckMarshaller;
PGHookCheckMarshaller = ^TGHookCheckMarshaller;
TGHookCheckMarshaller = function(hook: PGHook; marshal_data: gpointer): gboolean; cdecl;
TGHookListBitfield0 = bitpacked record
hook_size: guint16 { changed from guint to accomodate 16 bitsize requirement };
is_setup: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
PPGHookFinalizeFunc = ^PGHookFinalizeFunc;
PGHookFinalizeFunc = ^TGHookFinalizeFunc;
TGHookFinalizeFunc = procedure(hook_list: PGHookList; hook: PGHook); cdecl;
TGHookList = object
seq_id: gulong;
hook_size: guint16 { changed from guint to accomodate 16 bitsize requirement };
is_setup: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGHookListBitfield0; { auto generated type }
hooks: PGHook;
dummy3: gpointer;
finalize_hook: TGHookFinalizeFunc;
@ -1899,6 +1906,14 @@ type
PPGIOChannelError = ^PGIOChannelError;
PGIOChannelError = ^TGIOChannelError;
TGIOChannelBitfield0 = bitpacked record
use_buffer: guint1 { changed from guint to accomodate 1 bitsize requirement };
do_encode: guint1 { changed from guint to accomodate 1 bitsize requirement };
close_on_unref: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_readable: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_writeable: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_seekable: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGIOChannel = object
ref_count: gint;
funcs: PGIOFuncs;
@ -1912,12 +1927,7 @@ type
encoded_read_buf: PGString;
write_buf: PGString;
partial_write_buf: array [0..5] of gchar;
use_buffer: guint1 { changed from guint to accomodate 1 bitsize requirement };
do_encode: guint1 { changed from guint to accomodate 1 bitsize requirement };
close_on_unref: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_readable: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_writeable: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_seekable: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGIOChannelBitfield0; { auto generated type }
reserved1: gpointer;
reserved2: gpointer;
function new_file(filename: Pgchar; mode: Pgchar): PGIOChannel; cdecl; inline; static;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit GModule2;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit GObject2;
{$MODE OBJFPC}{$H+}
@ -300,10 +301,7 @@ type
PPGClosureMarshal = ^PGClosureMarshal;
PGClosureMarshal = ^TGClosureMarshal;
PPGClosureNotifyData = ^PGClosureNotifyData;
PGClosureNotifyData = ^TGClosureNotifyData;
TGClosure = object
TGClosureBitfield0 = bitpacked record
ref_count: guint15 { changed from guint to accomodate 15 bitsize requirement };
meta_marshal: guint1 { changed from guint to accomodate 1 bitsize requirement };
n_guards: guint1 { changed from guint to accomodate 1 bitsize requirement };
@ -314,6 +312,12 @@ type
derivative_flag: guint1 { changed from guint to accomodate 1 bitsize requirement };
in_marshal: guint1 { changed from guint to accomodate 1 bitsize requirement };
is_invalid: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
PPGClosureNotifyData = ^PGClosureNotifyData;
PGClosureNotifyData = ^TGClosureNotifyData;
TGClosure = object
Bitfield0 : TGClosureBitfield0; { auto generated type }
marshal: procedure(closure: PGClosure; return_value: PGValue; n_param_values: guint; param_values: PGValue; invocation_hint: gpointer; marshal_data: gpointer); cdecl;
data: gpointer;
notifiers: PGClosureNotifyData;
@ -447,9 +451,6 @@ type
PPGInitiallyUnowned = ^PGInitiallyUnowned;
PGInitiallyUnowned = ^TGInitiallyUnowned;
TGInitiallyUnowned = object(TGObject)
g_type_instance1: TGTypeInstance;
ref_count1: guint;
qdata1: PGData;
end;
PPGObjectConstructParam = ^PGObjectConstructParam;
@ -674,6 +675,7 @@ type
PPGParamSpecOverride = ^PGParamSpecOverride;
PGParamSpecOverride = ^TGParamSpecOverride;
TGParamSpecOverride = object(TGParamSpec)
overridden: PGParamSpec;
end;
PPGParamSpecParam = ^PGParamSpecParam;
@ -699,13 +701,16 @@ type
PPGParamSpecString = ^PGParamSpecString;
PGParamSpecString = ^TGParamSpecString;
TGParamSpecStringBitfield0 = bitpacked record
null_fold_if_empty: guint1 { changed from guint to accomodate 1 bitsize requirement };
ensure_non_null: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGParamSpecString = object(TGParamSpec)
default_value: Pgchar;
cset_first: Pgchar;
cset_nth: Pgchar;
substitutor: gchar;
null_fold_if_empty: guint1 { changed from guint to accomodate 1 bitsize requirement };
ensure_non_null: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGParamSpecStringBitfield0; { auto generated type }
end;
PPGParamSpecTypeInfo = ^PGParamSpecTypeInfo;
@ -765,6 +770,7 @@ type
PPGParamSpecValueArray = ^PGParamSpecValueArray;
PGParamSpecValueArray = ^TGParamSpecValueArray;
TGParamSpecValueArray = object(TGParamSpec)
element_spec: PGParamSpec;
fixed_n_elements: guint;
end;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Gtk3;
{$MODE OBJFPC}{$H+}
@ -2424,6 +2425,9 @@ type
procedure set_accessible_role(role: TAtkRole); cdecl; inline;
procedure set_accessible_type(type_: TGType); cdecl; inline;
end;
TGtkContainerClassBitfield0 = bitpacked record
_handle_border_width: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGtkContainerClass = object
parent_class: TGtkWidgetClass;
add: procedure(container: PGtkContainer; widget: PGtkWidget); cdecl;
@ -2436,7 +2440,7 @@ type
set_child_property: procedure(container: PGtkContainer; child: PGtkWidget; property_id: guint; value: PGValue; pspec: PGParamSpec); cdecl;
get_child_property: procedure(container: PGtkContainer; child: PGtkWidget; property_id: guint; value: PGValue; pspec: PGParamSpec); cdecl;
get_path_for_child: function(container: PGtkContainer; child: PGtkWidget): PGtkWidgetPath; cdecl;
_handle_border_width: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkContainerClassBitfield0; { auto generated type }
_gtk_reserved1: procedure; cdecl;
_gtk_reserved2: procedure; cdecl;
_gtk_reserved3: procedure; cdecl;
@ -3058,6 +3062,9 @@ type
PPGtkBindingEntry = ^PGtkBindingEntry;
PGtkBindingEntry = ^TGtkBindingEntry;
TGtkBindingSetBitfield0 = bitpacked record
parsed: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGtkBindingSet = object
set_name: Pgchar;
priority: gint;
@ -3066,13 +3073,18 @@ type
class_branch_pspecs: PGSList;
entries: PGtkBindingEntry;
current: PGtkBindingEntry;
parsed: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkBindingSetBitfield0; { auto generated type }
function activate(keyval: guint; modifiers: TGdkModifierType; object_: PGObject): gboolean; cdecl; inline;
procedure add_path(path_type: TGtkPathType; path_pattern: Pgchar; priority: TGtkPathPriorityType); cdecl; inline;
function by_class(object_class: gpointer): PGtkBindingSet; cdecl; inline; static;
function find(set_name: Pgchar): PGtkBindingSet; cdecl; inline; static;
function new(set_name: Pgchar): PGtkBindingSet; cdecl; inline; static;
end;
TGtkBindingEntryBitfield0 = bitpacked record
destroyed: guint1 { changed from guint to accomodate 1 bitsize requirement };
in_emission: guint1 { changed from guint to accomodate 1 bitsize requirement };
marks_unbound: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
PPGtkBindingSignal = ^PGtkBindingSignal;
PGtkBindingSignal = ^TGtkBindingSignal;
@ -3080,9 +3092,7 @@ type
keyval: guint;
modifiers: TGdkModifierType;
binding_set: PGtkBindingSet;
destroyed: guint1 { changed from guint to accomodate 1 bitsize requirement };
in_emission: guint1 { changed from guint to accomodate 1 bitsize requirement };
marks_unbound: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkBindingEntryBitfield0; { auto generated type }
set_next: PGtkBindingEntry;
hash_next: PGtkBindingEntry;
signals: PGtkBindingSignal;
@ -4223,9 +4233,12 @@ type
PPGtkMenuItemClass = ^PGtkMenuItemClass;
PGtkMenuItemClass = ^TGtkMenuItemClass;
TGtkMenuItemClassBitfield0 = bitpacked record
hide_on_activate: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGtkMenuItemClass = object
parent_class: TGtkBinClass;
hide_on_activate: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkMenuItemClassBitfield0; { auto generated type }
activate: procedure(menu_item: PGtkMenuItem); cdecl;
activate_item: procedure(menu_item: PGtkMenuItem); cdecl;
toggle_size_request: procedure(menu_item: PGtkMenuItem; requisition: Pgint); cdecl;
@ -6992,12 +7005,15 @@ type
PPGtkMenuShellClass = ^PGtkMenuShellClass;
PGtkMenuShellClass = ^TGtkMenuShellClass;
TGtkMenuShellClassBitfield0 = bitpacked record
submenu_placement: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
PPGtkMenuDirectionType = ^PGtkMenuDirectionType;
PGtkMenuDirectionType = ^TGtkMenuDirectionType;
TGtkMenuShellClass = object
parent_class: TGtkContainerClass;
submenu_placement: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkMenuShellClassBitfield0; { auto generated type }
deactivate: procedure(menu_shell: PGtkMenuShell); cdecl;
selection_done: procedure(menu_shell: PGtkMenuShell); cdecl;
move_current: procedure(menu_shell: PGtkMenuShell; direction: TGtkMenuDirectionType); cdecl;
@ -8103,6 +8119,9 @@ type
PPGtkRcFlags = ^PGtkRcFlags;
PGtkRcFlags = ^TGtkRcFlags;
TGtkRcStyleBitfield0 = bitpacked record
engine_specified: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGtkRcStyle = object(TGObject)
name: Pgchar;
bg_pixmap_name: array [0..4] of Pgchar;
@ -8117,7 +8136,7 @@ type
rc_properties: gpointer;
rc_style_lists: PGSList;
icon_factories: PGSList;
engine_specified: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkRcStyleBitfield0; { auto generated type }
end;
@ -9329,6 +9348,11 @@ type
PPGtkTextAttributes = ^PGtkTextAttributes;
PGtkTextAttributes = ^TGtkTextAttributes;
TGtkTextAttributesBitfield0 = bitpacked record
invisible: guint1 { changed from guint to accomodate 1 bitsize requirement };
bg_full_height: guint1 { changed from guint to accomodate 1 bitsize requirement };
editable: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TGtkTextAttributes = object
refcount: guint;
appearance: TGtkTextAppearance;
@ -9346,9 +9370,7 @@ type
wrap_mode: TPangoWrapMode;
language: PPangoLanguage;
pg_bg_color: PGdkColor;
invisible: guint1 { changed from guint to accomodate 1 bitsize requirement };
bg_full_height: guint1 { changed from guint to accomodate 1 bitsize requirement };
editable: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TGtkTextAttributesBitfield0; { auto generated type }
pg_bg_rgba: PGdkRGBA;
padding: array [0..2] of guint;
function new: PGtkTextAttributes; cdecl; inline; static;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit JSCore3;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Pango1;
{$MODE OBJFPC}{$H+}
@ -621,10 +622,13 @@ type
PPPangoAttrSize = ^PPangoAttrSize;
PPangoAttrSize = ^TPangoAttrSize;
TPangoAttrSizeBitfield0 = bitpacked record
absolute: guint1 { changed from guint to accomodate 1 bitsize requirement };
end;
TPangoAttrSize = object
attr: TPangoAttribute;
size: gint;
absolute: guint1 { changed from guint to accomodate 1 bitsize requirement };
Bitfield0 : TPangoAttrSizeBitfield0; { auto generated type }
function new(size: gint): PPangoAttribute; cdecl; inline; static;
function new_absolute(size: gint): PPangoAttribute; cdecl; inline; static;
end;
@ -932,13 +936,16 @@ type
function next_line: gboolean; cdecl; inline;
function next_run: gboolean; cdecl; inline;
end;
TPangoLayoutLineBitfield0 = bitpacked record
is_paragraph_start: guint1 { changed from guint to accomodate 1 bitsize requirement };
resolved_dir: guint3 { changed from guint to accomodate 3 bitsize requirement };
end;
TPangoLayoutLine = object
layout: PPangoLayout;
start_index: gint;
length: gint;
runs: PGSList;
is_paragraph_start: guint1 { changed from guint to accomodate 1 bitsize requirement };
resolved_dir: guint3 { changed from guint to accomodate 3 bitsize requirement };
Bitfield0 : TPangoLayoutLineBitfield0; { auto generated type }
procedure get_extents(ink_rect: PPangoRectangle; logical_rect: PPangoRectangle); cdecl; inline;
procedure get_pixel_extents(ink_rect: PPangoRectangle; logical_rect: PPangoRectangle); cdecl; inline;
procedure get_x_ranges(start_index: gint; end_index: gint; ranges: PPgint; n_ranges: Pgint); cdecl; inline;

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit Soup2_4;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit WebKit3;
{$MODE OBJFPC}{$H+}

View File

@ -1,3 +1,4 @@
{ This is an autogenerated unit using gobject introspection. Do not Edit. }
unit xlib2;
{$MODE OBJFPC}{$H+}