----------------------------------------------------------------------- -- GtkAda - Ada95 binding for Gtk+/Gnome -- -- -- -- Copyright (C) 2010, AdaCore -- -- -- -- This library is free software; you can redistribute it and/or -- -- modify it under the terms of the GNU General Public -- -- License as published by the Free Software Foundation; either -- -- version 2 of the License, or (at your option) any later version. -- -- -- -- This library is distributed in the hope that it will be useful, -- -- but WITHOUT ANY WARRANTY; without even the implied warranty of -- -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -- -- General Public License for more details. -- -- -- -- You should have received a copy of the GNU General Public -- -- License along with this library; if not, write to the -- -- Free Software Foundation, Inc., 59 Temple Place - Suite 330, -- -- Boston, MA 02111-1307, USA. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- ----------------------------------------------------------------------- -- -- -- 2.16.6 with Glib.Object; with Gtk.Page_Setup; with Pango.Context; with Pango.Layout; with Cairo; package Gtk.Print_Context is type Gtk_Print_Context_Record is new Glib.Object.GObject_Record with private; type Gtk_Print_Context is access all Gtk_Print_Context_Record'Class; function Get_Type return GType; function Create_Pango_Context (Context : access Gtk_Print_Context_Record) return Pango.Context.Pango_Context; -- Creates a new Pango_Context that can be used with the Gtk_Print_Context. function Create_Pango_Layout (Context : access Gtk_Print_Context_Record) return Pango.Layout.Pango_Layout; -- Creates a new Pango_Layout that is suitable for use -- with the Gtk_Print_Context. function Get_Cairo_Context (Context : access Gtk_Print_Context_Record) return Cairo.Cairo_Context; -- Obtains the cairo context that is associated with the Gtk_Print_Context. function Get_Dpi_X (Context : access Gtk_Print_Context_Record) return Gdouble; -- Obtains the horizontal resolution of the Gtk_Print_Context, -- in dots per inch. function Get_Dpi_Y (Context : access Gtk_Print_Context_Record) return Gdouble; -- Obtains the vertical resolution of the Gtk_Print_Context, -- in dots per inch. function Get_Height (Context : access Gtk_Print_Context_Record) return Gdouble; -- Obtains the height of the Gtk_Print_Context, in pixels. function Get_Page_Setup (Context : access Gtk_Print_Context_Record) return Gtk.Page_Setup.Gtk_Page_Setup; -- Obtains the Gtk_Page_Setup that determines the page -- dimensions of the Gtk_Print_Context. function Get_Width (Context : access Gtk_Print_Context_Record) return Gdouble; -- Obtains the width of the Gtk_Print_Context, in pixels. procedure Set_Cairo_Context (Context : access Gtk_Print_Context_Record; Cr : Cairo.Cairo_Context; Dpi_X : Gdouble; Dpi_Y : Gdouble); -- Context: a Gtk_Print_Context -- Cr: the cairo context -- Dpi_X: the horizontal resolution to use with Cr -- Dpi_Y: the vertical resolution to use with Cr -- -- Sets a new cairo context on a print context. -- -- This function is intended to be used when implementing -- an internal print preview, it is not needed for printing, -- since GTK+ itself creates a suitable cairo context in that -- case. private type Gtk_Print_Context_Record is new Glib.Object.GObject_Record with null record; pragma Import (C, Get_Type, "gtk_print_context_get_type"); end Gtk.Print_Context;