mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-07 06:38:06 +02:00
GTK3: Updated lazcairo1 binding unit.
We used Bookworm (Debian 12.2) GIR files constrained the units version to Bullseye (Debian 11.6) shipped libraries. They were generated using the following command: ```sh gir2pas -P Laz -e Set -w \ -M atk-2.36 \ -M pango-1.16 \ -M pangocairo-1.46 \ -M glib-2.66 \ -M gio-2.66 \ -M gmodule-2.66 \ -M gobject-2.66 \ -M gtk-3.24 \ -i /usr/share/gir-1.0/PangoCairo-1.0.gir \ -o lazarus/lcl/interfaces/gtk3/gtk3bindings ``` Some code was manually added at the end of the interface section to keep backward compatibility with old, manually translated unit.
This commit is contained in:
parent
f600868569
commit
9b23abbad1
@ -286,32 +286,32 @@ type
|
||||
type
|
||||
|
||||
|
||||
{ TCairoContext }
|
||||
PPCairoContext = ^PCairoContext;
|
||||
PCairoContext = ^TCairoContext;
|
||||
TCairoContext = object
|
||||
{ Tcairo_t }
|
||||
PPcairo_t = ^Pcairo_t;
|
||||
Pcairo_t = ^Tcairo_t;
|
||||
Tcairo_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TCairoDevice }
|
||||
PPCairoDevice = ^PCairoDevice;
|
||||
PCairoDevice = ^TCairoDevice;
|
||||
TCairoDevice = object
|
||||
{ Tcairo_device_t }
|
||||
PPcairo_device_t = ^Pcairo_device_t;
|
||||
Pcairo_device_t = ^Tcairo_device_t;
|
||||
Tcairo_device_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TCairoSurface }
|
||||
PPCairoSurface = ^PCairoSurface;
|
||||
PCairoSurface = ^TCairoSurface;
|
||||
TCairoSurface = object
|
||||
{ Tcairo_surface_t }
|
||||
PPcairo_surface_t = ^Pcairo_surface_t;
|
||||
Pcairo_surface_t = ^Tcairo_surface_t;
|
||||
Tcairo_surface_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TcairoMatrix }
|
||||
PPcairoMatrix = ^PcairoMatrix;
|
||||
PcairoMatrix = ^TcairoMatrix;
|
||||
{ Tcairo_matrix_t }
|
||||
PPcairo_matrix_t = ^Pcairo_matrix_t;
|
||||
Pcairo_matrix_t = ^Tcairo_matrix_t;
|
||||
|
||||
TcairoMatrix = record
|
||||
Tcairo_matrix_t = record
|
||||
xx : Double;
|
||||
yx : Double;
|
||||
xy : Double;
|
||||
@ -323,17 +323,17 @@ type
|
||||
|
||||
|
||||
|
||||
{ TCairoPattern }
|
||||
PPCairoPattern = ^PCairoPattern;
|
||||
PCairoPattern = ^TCairoPattern;
|
||||
TCairoPattern = object
|
||||
{ Tcairo_pattern_t }
|
||||
PPcairo_pattern_t = ^Pcairo_pattern_t;
|
||||
Pcairo_pattern_t = ^Tcairo_pattern_t;
|
||||
Tcairo_pattern_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TCairoRegion }
|
||||
PPCairoRegion = ^PCairoRegion;
|
||||
PCairoRegion = ^TCairoRegion;
|
||||
TCairoRegion = object
|
||||
{ Tcairo_region_t }
|
||||
PPcairo_region_t = ^Pcairo_region_t;
|
||||
Pcairo_region_t = ^Tcairo_region_t;
|
||||
Tcairo_region_t = object
|
||||
end;
|
||||
|
||||
|
||||
@ -402,10 +402,10 @@ type
|
||||
Pcairo_hint_metrics_t = ^Tcairo_hint_metrics_t;
|
||||
|
||||
|
||||
{ TCairoFontOptions }
|
||||
PPCairoFontOptions = ^PCairoFontOptions;
|
||||
PCairoFontOptions = ^TCairoFontOptions;
|
||||
TCairoFontOptions = object
|
||||
{ Tcairo_font_options_t }
|
||||
PPcairo_font_options_t = ^Pcairo_font_options_t;
|
||||
Pcairo_font_options_t = ^Tcairo_font_options_t;
|
||||
Tcairo_font_options_t = object
|
||||
end;
|
||||
|
||||
|
||||
@ -454,38 +454,38 @@ type
|
||||
Pcairo_region_overlap_t = ^Tcairo_region_overlap_t;
|
||||
|
||||
|
||||
{ TCairoFontFace }
|
||||
PPCairoFontFace = ^PCairoFontFace;
|
||||
PCairoFontFace = ^TCairoFontFace;
|
||||
TCairoFontFace = object
|
||||
{ Tcairo_font_face_t }
|
||||
PPcairo_font_face_t = ^Pcairo_font_face_t;
|
||||
Pcairo_font_face_t = ^Tcairo_font_face_t;
|
||||
Tcairo_font_face_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TCairoScaledFont }
|
||||
PPCairoScaledFont = ^PCairoScaledFont;
|
||||
PCairoScaledFont = ^TCairoScaledFont;
|
||||
TCairoScaledFont = object
|
||||
{ Tcairo_scaled_font_t }
|
||||
PPcairo_scaled_font_t = ^Pcairo_scaled_font_t;
|
||||
Pcairo_scaled_font_t = ^Tcairo_scaled_font_t;
|
||||
Tcairo_scaled_font_t = object
|
||||
end;
|
||||
|
||||
|
||||
{ TcairoPath }
|
||||
PPcairoPath = ^PcairoPath;
|
||||
PcairoPath = ^TcairoPath;
|
||||
{ Tcairo_path_t }
|
||||
PPcairo_path_t = ^Pcairo_path_t;
|
||||
Pcairo_path_t = ^Tcairo_path_t;
|
||||
|
||||
TcairoPath = record
|
||||
Tcairo_path_t = record
|
||||
end;
|
||||
|
||||
|
||||
|
||||
|
||||
{ TCairoRectangle }
|
||||
PPCairoRectangle = ^PCairoRectangle;
|
||||
PCairoRectangle = ^TCairoRectangle;
|
||||
{ Tcairo_rectangle_t }
|
||||
PPcairo_rectangle_t = ^Pcairo_rectangle_t;
|
||||
Pcairo_rectangle_t = ^Tcairo_rectangle_t;
|
||||
|
||||
|
||||
{ cdouble }
|
||||
Pcdouble = ^cdouble;
|
||||
TCairoRectangle = object
|
||||
Tcairo_rectangle_t = object
|
||||
x: cdouble;
|
||||
y: cdouble;
|
||||
width: cdouble;
|
||||
@ -493,18 +493,18 @@ type
|
||||
end;
|
||||
|
||||
|
||||
{ TCairoRectangleInt }
|
||||
PPCairoRectangleInt = ^PCairoRectangleInt;
|
||||
PCairoRectangleInt = ^TCairoRectangleInt;
|
||||
{ Tcairo_rectangle_int_t }
|
||||
PPcairo_rectangle_int_t = ^Pcairo_rectangle_int_t;
|
||||
Pcairo_rectangle_int_t = ^Tcairo_rectangle_int_t;
|
||||
|
||||
|
||||
{ cint32 }
|
||||
Pcint32 = ^cint32;
|
||||
TCairoRectangleInt = object
|
||||
x: cint32;
|
||||
y: cint32;
|
||||
width: cint32;
|
||||
height: cint32;
|
||||
{ cint }
|
||||
Pcint = ^cint;
|
||||
Tcairo_rectangle_int_t = object
|
||||
x: cint;
|
||||
y: cint;
|
||||
width: cint;
|
||||
height: cint;
|
||||
end;
|
||||
|
||||
function cairo_gobject_context_get_type: csize_t { TGType }; cdecl; external Lazcairo1_library name 'cairo_gobject_context_get_type';
|
||||
@ -528,34 +528,6 @@ procedure cairo_image_surface_create; cdecl; external Lazcairo1_library name 'ca
|
||||
const
|
||||
LIB_CAIRO = Lazcairo1_library;
|
||||
|
||||
type
|
||||
PPcairo_rectangle_int_t = PPCairoRectangleInt;
|
||||
PPcairo_surface_t = PPCairoSurface;
|
||||
|
||||
Pcairo_t = PCairoContext;
|
||||
Pcairo_device_t = PCairoDevice;
|
||||
Pcairo_font_face_t = PCairoFontFace;
|
||||
Pcairo_font_options_t = PCairoFontOptions;
|
||||
Pcairo_matrix_t = PCairoMatrix;
|
||||
Pcairo_pattern_t = PCairoPattern;
|
||||
Pcairo_path_t = PCairoPath;
|
||||
Pcairo_rectangle_int_t = PCairoRectangleInt;
|
||||
Pcairo_region_t = PCairoRegion;
|
||||
Pcairo_scaled_font_t = PCairoScaledFont;
|
||||
Pcairo_surface_t = PCairoSurface;
|
||||
|
||||
Tcairo_t = TCairoContext;
|
||||
Tcairo_device_t = TCairoDevice;
|
||||
Tcairo_font_face_t = TCairoFontFace;
|
||||
Tcairo_font_options_t = TCairoFontOptions;
|
||||
Tcairo_matrix_t = TCairoMatrix;
|
||||
Tcairo_pattern_t = TCairoPattern;
|
||||
Tcairo_path_t = TCairoPath;
|
||||
Tcairo_rectangle_int_t = TCairoRectangleInt;
|
||||
Tcairo_region_t = TCairoRegion;
|
||||
Tcairo_scaled_font_t = TCairoScaledFont;
|
||||
Tcairo_surface_t = TCairoSurface;
|
||||
|
||||
function cairo_version: LongInt; cdecl; external LIB_CAIRO;
|
||||
function cairo_version_string: PChar; cdecl; external LIB_CAIRO;
|
||||
//Helper function to retrieve decoded version
|
||||
|
Loading…
Reference in New Issue
Block a user