Gtk.Gesture_Zoom

Description

Recognizes 2-finger pinch/zoom gestures.

Whenever the distance between both tracked sequences changes, the [signalGtk.GestureZoom::scale-changed] signal is emitted to report the scale factor.

<gtkada_demo>create_gestures.adb</gtkada_demo>

Cb_GObject_Gdouble_Void

type Cb_GObject_Gdouble_Void is not null access procedure
  (Self  : access Glib.Object.GObject_Record'Class;
   Scale : Gdouble);

Parameters

Self

Scale

Cb_Gtk_Gesture_Zoom_Gdouble_Void

type Cb_Gtk_Gesture_Zoom_Gdouble_Void is not null access procedure
  (Self  : access Gtk_Gesture_Zoom_Record'Class;
   Scale : Gdouble);

Parameters

Self

Scale

Get_Scale_Delta

function Get_Scale_Delta
   (Self : not null access Gtk_Gesture_Zoom_Record) return Gdouble

Gets the scale delta. If Gesture is active, this function returns the zooming difference since the gesture was recognized (hence the starting point is considered 1:1). If Gesture is not active, 1 is returned.

Parameters

Self

Return Value

the scale delta

Get_Type

function Get_Type return Glib.GType

Return Value

Gtk_Gesture_Zoom

type Gtk_Gesture_Zoom is access all Gtk_Gesture_Zoom_Record'Class;

Gtk_Gesture_Zoom_New

function Gtk_Gesture_Zoom_New return Gtk_Gesture_Zoom

Returns a newly created GtkGesture that recognizes pinch/zoom gestures.

Return Value

Gtk_Gesture_Zoom_Record

type Gtk_Gesture_Zoom_Record is new Gtk_Gesture_Record with null record;

Gtk_New

procedure Gtk_New (Self : out Gtk_Gesture_Zoom)

Returns a newly created GtkGesture that recognizes pinch/zoom gestures. Initialize does nothing if the object was already created with another call to Initialize* or G_New.

Parameters

Self

Initialize

procedure Initialize
   (Self : not null access Gtk_Gesture_Zoom_Record'Class)

Returns a newly created GtkGesture that recognizes pinch/zoom gestures. Initialize does nothing if the object was already created with another call to Initialize* or G_New.

Parameters

Self

On_Scale_Changed

procedure On_Scale_Changed
   (Self  : not null access Gtk_Gesture_Zoom_Record;
    Call  : Cb_GObject_Gdouble_Void;
    Slot  : not null access Glib.Object.GObject_Record'Class;
    After : Boolean := False)

Emitted whenever the distance between both tracked sequences changes.

Parameters

Self

Call

Slot

After

On_Scale_Changed

procedure On_Scale_Changed
   (Self  : not null access Gtk_Gesture_Zoom_Record;
    Call  : Cb_Gtk_Gesture_Zoom_Gdouble_Void;
    After : Boolean := False)

Emitted whenever the distance between both tracked sequences changes.

Parameters

Self

Call

After

Signal_Scale_Changed

Signal_Scale_Changed : constant Glib.Signal_Name := "scale-changed";

Emitted whenever the distance between both tracked sequences changes.