1// included by gtk2.pas
2
3{$IFDEF read_forward_definitions}
4{$ENDIF read_forward_definitions}
5
6//------------------------------------------------------------------------------
7
8{$IFDEF read_interface_types}
9   PGtkAlignment = ^TGtkAlignment;
10   TGtkAlignment = record
11        bin : TGtkBin;
12        xalign : gfloat;
13        yalign : gfloat;
14        xscale : gfloat;
15        yscale : gfloat;
16     end;
17
18   PGtkAlignmentClass = ^TGtkAlignmentClass;
19   TGtkAlignmentClass = record
20        parent_class : TGtkBinClass;
21     end;
22
23{$ENDIF read_interface_types}
24
25//------------------------------------------------------------------------------
26
27{$IFDEF read_interface_rest}
28function GTK_TYPE_ALIGNMENT : GType;
29function GTK_ALIGNMENT(obj: pointer) : PGtkAlignment;
30function GTK_ALIGNMENT_CLASS(klass: pointer) : PGtkAlignmentClass;
31function GTK_IS_ALIGNMENT(obj: pointer) : boolean;
32function GTK_IS_ALIGNMENT_CLASS(klass: pointer) : boolean;
33function GTK_ALIGNMENT_GET_CLASS(obj: pointer) : PGtkAlignmentClass;
34
35
36function gtk_alignment_get_type:TGtkType; cdecl; external gtklib;
37function gtk_alignment_new(xalign:gfloat; yalign:gfloat; xscale:gfloat; yscale:gfloat):PGtkWidget; cdecl; external gtklib;
38procedure gtk_alignment_set(alignment:PGtkAlignment; xalign:gfloat; yalign:gfloat; xscale:gfloat; yscale:gfloat); cdecl; external gtklib;
39
40{$ifdef HasGTK2_4}
41procedure gtk_alignment_get_padding(alignment: PGtkAlignment; padding_top: Pguint; padding_bottom: Pguint; padding_left: Pguint; padding_right: Pguint); cdecl; external gtklib;
42procedure gtk_alignment_set_padding(alignment: PGtkAlignment; padding_top: guint; padding_bottom: guint; padding_left: guint; padding_right: guint); cdecl; external gtklib;
43{$endif}
44{$ENDIF read_interface_rest}
45
46//------------------------------------------------------------------------------
47
48{$IFDEF read_implementation}
49function GTK_TYPE_ALIGNMENT : GType;
50begin
51   GTK_TYPE_ALIGNMENT:=gtk_alignment_get_type;
52end;
53
54function GTK_ALIGNMENT(obj: pointer) : PGtkAlignment;
55begin
56   GTK_ALIGNMENT:=PGtkAlignment(GTK_CHECK_CAST(obj,GTK_TYPE_ALIGNMENT));
57end;
58
59function GTK_ALIGNMENT_CLASS(klass: pointer) : PGtkAlignmentClass;
60begin
61   GTK_ALIGNMENT_CLASS:=PGtkAlignmentClass(GTK_CHECK_CLASS_CAST(klass,GTK_TYPE_ALIGNMENT));
62end;
63
64function GTK_IS_ALIGNMENT(obj: pointer) : boolean;
65begin
66   GTK_IS_ALIGNMENT:=GTK_CHECK_TYPE(obj,GTK_TYPE_ALIGNMENT);
67end;
68
69function GTK_IS_ALIGNMENT_CLASS(klass: pointer) : boolean;
70begin
71   GTK_IS_ALIGNMENT_CLASS:=GTK_CHECK_CLASS_TYPE(klass,GTK_TYPE_ALIGNMENT);
72end;
73
74function GTK_ALIGNMENT_GET_CLASS(obj: pointer) : PGtkAlignmentClass;
75begin
76   GTK_ALIGNMENT_GET_CLASS:=PGtkAlignmentClass(GTK_CHECK_GET_CLASS(obj,GTK_TYPE_ALIGNMENT));
77end;
78
79{$ENDIF read_implementation}
80// included by gtk2.pas
81
82