/packages/gtk2/src/gtk+/gdk/gdkpixmap.inc

https://github.com/slibre/freepascal · Pascal · 125 lines · 80 code · 28 blank · 17 comment · 0 complexity · 044c3ed581b6055f5fce2b39e7b7b763 MD5 · raw file

  1. // included by gdk2.pp
  2. {$IFDEF read_interface_types}
  3. { window-system-specific delegate anObject }
  4. PGdkPixmapObject = ^TGdkPixmapObject;
  5. TGdkPixmapObject = record
  6. parent_instance : TGdkDrawable;
  7. impl : PGdkDrawable;
  8. depth : gint;
  9. end;
  10. PGdkPixmapObjectClass = ^TGdkPixmapObjectClass;
  11. TGdkPixmapObjectClass = record
  12. parent_class : TGdkDrawableClass;
  13. end;
  14. {$ENDIF read_interface_types}
  15. //------------------------------------------------------------------------------
  16. {$IFDEF read_interface_rest}
  17. function GDK_TYPE_PIXMAP : GType;
  18. function GDK_PIXMAP(anObject : Pointer) : PGdkPixmap;
  19. function GDK_PIXMAP_CLASS(klass : Pointer) : PGdkPixmapObjectClass;
  20. function GDK_IS_PIXMAP(anObject : Pointer) : boolean;
  21. function GDK_IS_PIXMAP_CLASS(klass : Pointer) : boolean;
  22. function GDK_PIXMAP_GET_CLASS(obj : Pointer) : PGdkPixmapObjectClass;
  23. function GDK_PIXMAP_OBJECT(anObject : Pointer) : PGdkPixmapObject;
  24. function gdk_pixmap_get_type:GType; cdecl; external gdklib;
  25. { Pixmaps }
  26. function gdk_pixmap_new(window:PGdkWindow; width:gint; height:gint; depth:gint):PGdkPixmap; cdecl; external gdklib;
  27. function gdk_bitmap_create_from_data(window:PGdkWindow; data:Pgchar; width:gint; height:gint):PGdkBitmap; cdecl; external gdklib;
  28. function gdk_pixmap_create_from_data(window:PGdkWindow; data:Pgchar; width:gint; height:gint; depth:gint;
  29. fg:PGdkColor; bg:PGdkColor):PGdkPixmap; cdecl; external gdklib;
  30. function gdk_pixmap_create_from_xpm(window:PGdkWindow; var mask:PGdkBitmap; transparent_color:PGdkColor; filename:Pgchar):PGdkPixmap; cdecl; external gdklib;
  31. function gdk_pixmap_colormap_create_from_xpm(window:PGdkWindow; colormap:PGdkColormap; var mask:PGdkBitmap; transparent_color:PGdkColor; filename:Pgchar):PGdkPixmap; cdecl; external gdklib;
  32. function gdk_pixmap_create_from_xpm_d(window:PGdkWindow; var mask:PGdkBitmap; transparent_color:PGdkColor; data:PPgchar):PGdkPixmap; cdecl; external gdklib;
  33. function gdk_pixmap_colormap_create_from_xpm_d(window:PGdkWindow; colormap:PGdkColormap; var mask:PGdkBitmap; transparent_color:PGdkColor; data:PPgchar):PGdkPixmap; cdecl; external gdklib;
  34. { Functions to create/lookup pixmaps from their native equivalents }
  35. {$ifndef GDK_MULTIHEAD_SAFE}
  36. function gdk_pixmap_foreign_new(anid:TGdkNativeWindow):PGdkPixmap; cdecl; external gdklib;
  37. function gdk_pixmap_lookup(anid:TGdkNativeWindow):PGdkPixmap; cdecl; external gdklib;
  38. {$endif}
  39. { GDK_MULTIHEAD_SAFE }
  40. function gdk_pixmap_foreign_new_for_display(display:PGdkDisplay; anid:TGdkNativeWindow):PGdkPixmap; cdecl; external gdklib;
  41. function gdk_pixmap_lookup_for_display(display:PGdkDisplay; anid:TGdkNativeWindow):PGdkPixmap; cdecl; external gdklib;
  42. {$ifndef GDK_DISABLE_DEPRECATED}
  43. function gdk_bitmap_ref(drawable:PGdkDrawable):PGdkDrawable;
  44. procedure gdk_bitmap_unref(drawable:PGdkDrawable);
  45. function gdk_pixmap_ref(drawable:PGdkDrawable):PGdkDrawable;
  46. procedure gdk_pixmap_unref(drawable:PGdkDrawable);
  47. {$endif}
  48. {$endif read_interface_rest}
  49. //------------------------------------------------------------------------------
  50. {$IFDEF read_implementation}
  51. function GDK_TYPE_PIXMAP : GType;
  52. begin
  53. GDK_TYPE_PIXMAP:=gdk_pixmap_get_type;
  54. end;
  55. function GDK_PIXMAP(anObject : Pointer) : PGdkPixmap;
  56. begin
  57. GDK_PIXMAP:=PGdkPixmap(G_TYPE_CHECK_INSTANCE_CAST(anObject,GDK_TYPE_PIXMAP));
  58. end;
  59. function GDK_PIXMAP_CLASS(klass : Pointer) : PGdkPixmapObjectClass;
  60. begin
  61. GDK_PIXMAP_CLASS:=PGdkPixmapObjectClass(G_TYPE_CHECK_CLASS_CAST(klass,
  62. GDK_TYPE_PIXMAP));
  63. end;
  64. function GDK_IS_PIXMAP(anObject : Pointer) : boolean;
  65. begin
  66. GDK_IS_PIXMAP:=G_TYPE_CHECK_INSTANCE_TYPE(anObject,GDK_TYPE_PIXMAP);
  67. end;
  68. function GDK_IS_PIXMAP_CLASS(klass : Pointer) : boolean;
  69. begin
  70. GDK_IS_PIXMAP_CLASS:=G_TYPE_CHECK_CLASS_TYPE(klass,GDK_TYPE_PIXMAP);
  71. end;
  72. function GDK_PIXMAP_GET_CLASS(obj : Pointer) : PGdkPixmapObjectClass;
  73. begin
  74. GDK_PIXMAP_GET_CLASS:=PGdkPixmapObjectClass(G_TYPE_INSTANCE_GET_CLASS(obj,
  75. GDK_TYPE_PIXMAP));
  76. end;
  77. function GDK_PIXMAP_OBJECT(anObject : Pointer) : PGdkPixmapObject;
  78. begin
  79. GDK_PIXMAP_OBJECT:=PGdkPixmapObject(GDK_PIXMAP(anObject));
  80. end;
  81. function gdk_bitmap_ref(drawable:PGdkDrawable):PGdkDrawable;
  82. begin
  83. gdk_bitmap_ref:=GDK_DRAWABLE(g_object_ref(G_OBJECT(drawable)));
  84. end;
  85. procedure gdk_bitmap_unref(drawable:PGdkDrawable);
  86. begin
  87. g_object_unref(G_OBJECT(drawable));
  88. end;
  89. function gdk_pixmap_ref(drawable:PGdkDrawable):PGdkDrawable;
  90. begin
  91. gdk_pixmap_ref:=GDK_DRAWABLE(g_object_ref(G_OBJECT(drawable)));
  92. end;
  93. procedure gdk_pixmap_unref(drawable:PGdkDrawable);
  94. begin
  95. g_object_unref(G_OBJECT(drawable));
  96. end;
  97. {$ENDIF}