← Back to branch summary

~ubuntu-branches/ubuntu/lucid/fpc/lucid-proposed

« back to all changes in this revision

Viewing changes to fpcsrc/packages/gtk1/src/gtk/gtktoolbar.pp

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-10-09 23:29:00 UTC
  • mfrom: (4.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20081009232900-553f61m37jkp6upv
Tags: 2.2.2-4
http://bugs.debian.org/498882
[ Torsten Werner ]
* Update ABI version in fpc-depends automatically.
* Remove empty directories from binary package fpc-source.

[ Mazen Neifer ]
* Removed leading path when calling update-alternatives to remove a Linitian
  error.
* Fixed clean target.
* Improved description of packages. (Closes: #498882)

Show diffs side-by-side

added added

removed removed

Lines of Context:
fpcsrc/packages/gtk1/src/gtk/gtktoolbar.pp
 
1
{
 
2
}
 
3
 
 
4
{****************************************************************************
 
5
                                 Interface
 
6
****************************************************************************}
 
7
 
 
8
{$ifdef read_interface}
 
9
 
 
10
  type
 
11
     TGtkToolbarChildType = longint;
 
12
  const
 
13
     GTK_TOOLBAR_CHILD_SPACE = 0;
 
14
     GTK_TOOLBAR_CHILD_BUTTON = 1;
 
15
     GTK_TOOLBAR_CHILD_TOGGLEBUTTON = 2;
 
16
     GTK_TOOLBAR_CHILD_RADIOBUTTON = 3;
 
17
     GTK_TOOLBAR_CHILD_WIDGET = 4;
 
18
 
 
19
  type
 
20
     TGtkToolbarSpaceStyle = longint;
 
21
  const
 
22
     GTK_TOOLBAR_SPACE_EMPTY = 0;
 
23
     GTK_TOOLBAR_SPACE_LINE = 1;
 
24
 
 
25
  type
 
26
     PGtkToolbarChild = ^TGtkToolbarChild;
 
27
     TGtkToolbarChild = record
 
28
          thetype : TGtkToolbarChildType;
 
29
          widget : PGtkWidget;
 
30
          icon : PGtkWidget;
 
31
          thelabel : PGtkWidget;
 
32
       end;
 
33
 
 
34
     PGtkToolbar = ^TGtkToolbar;
 
35
     TGtkToolbar = record
 
36
          container : TGtkContainer;
 
37
          num_children : gint;
 
38
          children : PGList;
 
39
          orientation : TGtkOrientation;
 
40
          style : TGtkToolbarStyle;
 
41
          space_size : gint;
 
42
          space_style : TGtkToolbarSpaceStyle;
 
43
          tooltips : PGtkTooltips;
 
44
          button_maxw : gint;
 
45
          button_maxh : gint;
 
46
          relief : TGtkReliefStyle;
 
47
       end;
 
48
 
 
49
     PGtkToolbarClass = ^TGtkToolbarClass;
 
50
     TGtkToolbarClass = record
 
51
          parent_class : TGtkContainerClass;
 
52
          orientation_changed : procedure (toolbar:PGtkToolbar; orientation:TGtkOrientation); cdecl;
 
53
          style_changed : procedure (toolbar:PGtkToolbar; style:TGtkToolbarStyle); cdecl;
 
54
       end;
 
55
 
 
56
Type
 
57
  GTK_TOOLBAR=PGtkToolbar;
 
58
  GTK_TOOLBAR_CLASS=PGtkToolbarClass;
 
59
 
 
60
function  gtk_toolbar_get_type:guint;cdecl;external gtkdll name 'gtk_toolbar_get_type';
 
61
function  gtk_toolbar_new(orientation:TGtkOrientation; style:TGtkToolbarStyle):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_new';
 
62
function  gtk_toolbar_append_item(toolbar:PGtkToolbar; thetext:pchar; tooltip_text:pchar; tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_append_item';
 
63
function  gtk_toolbar_prepend_item(toolbar:PGtkToolbar; thetext:pchar; tooltip_text:pchar; tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_prepend_item';
 
64
function  gtk_toolbar_insert_item(toolbar:PGtkToolbar; thetext:pchar; tooltip_text:pchar; tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer; position:gint):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_insert_item';
 
65
procedure gtk_toolbar_append_space(toolbar:PGtkToolbar);cdecl;external gtkdll name 'gtk_toolbar_append_space';
 
66
procedure gtk_toolbar_prepend_space(toolbar:PGtkToolbar);cdecl;external gtkdll name 'gtk_toolbar_prepend_space';
 
67
procedure gtk_toolbar_insert_space(toolbar:PGtkToolbar; position:gint);cdecl;external gtkdll name 'gtk_toolbar_insert_space';
 
68
function  gtk_toolbar_append_element(toolbar:PGtkToolbar; thetype:TGtkToolbarChildType; widget:PGtkWidget; thetext:pchar; tooltip_text:pchar;tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_append_element';
 
69
function  gtk_toolbar_prepend_element(toolbar:PGtkToolbar; thetype:TGtkToolbarChildType; widget:PGtkWidget; thetext:pchar; tooltip_text:pchar;tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer):PGtkWidget; cdecl;external gtkdll name 'gtk_toolbar_prepend_element';
 
70
function  gtk_toolbar_insert_element(toolbar:PGtkToolbar; thetype:TGtkToolbarChildType; widget:PGtkWidget; thetext:pchar; tooltip_text:pchar;tooltip_private_text:pchar; icon:PGtkWidget; callback:TGtkSignalFunc; user_data:gpointer; position:gint):PGtkWidget;cdecl;external gtkdll name 'gtk_toolbar_insert_element';
 
71
procedure gtk_toolbar_append_widget(toolbar:PGtkToolbar; widget:PGtkWidget; tooltip_text:pchar; tooltip_private_text:pchar);cdecl;external gtkdll name 'gtk_toolbar_append_widget';
 
72
procedure gtk_toolbar_prepend_widget(toolbar:PGtkToolbar; widget:PGtkWidget; tooltip_text:pchar; tooltip_private_text:pchar);cdecl;external gtkdll name 'gtk_toolbar_prepend_widget';
 
73
procedure gtk_toolbar_insert_widget(toolbar:PGtkToolbar; widget:PGtkWidget; tooltip_text:pchar; tooltip_private_text:pchar; position:gint);cdecl;external gtkdll name 'gtk_toolbar_insert_widget';
 
74
procedure gtk_toolbar_set_orientation(toolbar:PGtkToolbar; orientation:TGtkOrientation);cdecl;external gtkdll name 'gtk_toolbar_set_orientation';
 
75
procedure gtk_toolbar_set_style(toolbar:PGtkToolbar; style:TGtkToolbarStyle);cdecl;external gtkdll name 'gtk_toolbar_set_style';
 
76
procedure gtk_toolbar_set_space_size(toolbar:PGtkToolbar; space_size:gint);cdecl;external gtkdll name 'gtk_toolbar_set_space_size';
 
77
procedure gtk_toolbar_set_space_style(toolbar:PGtkToolbar; space_style:TGtkToolbarSpaceStyle);cdecl;external gtkdll name 'gtk_toolbar_set_space_style';
 
78
procedure gtk_toolbar_set_tooltips(toolbar:PGtkToolbar; enable:gint);cdecl;external gtkdll name 'gtk_toolbar_set_tooltips';
 
79
procedure gtk_toolbar_set_button_relief(toolbar:PGtkToolbar; relief:TGtkReliefStyle);cdecl;external gtkdll name 'gtk_toolbar_set_button_relief';
 
80
function  gtk_toolbar_get_button_relief(toolbar:PGtkToolbar):TGtkReliefStyle;cdecl;external gtkdll name 'gtk_toolbar_get_button_relief';
 
81
 
 
82
{$endif read_interface}
 
83
 
 
84
 
 
85
{****************************************************************************
 
86
                              Implementation
 
87
****************************************************************************}
 
88
 
 
89
{$ifdef read_implementation}
 
90
{$endif read_implementation}
 
91
 
 
92