~ubuntu-branches/debian/lenny/fpc/lenny

« back to all changes in this revision

Viewing changes to fpcsrc/packages/extra/gtk2/gtk+/gtk/gtkinvisible.inc

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-05-17 17:12:11 UTC
  • mfrom: (3.1.9 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080517171211-9qi33xhd9evfa0kg
Tags: 2.2.0-dfsg1-9
[ Torsten Werner ]
* Add Mazen Neifer to Uploaders field.

[ Mazen Neifer ]
* Moved FPC sources into a version dependent directory from /usr/share/fpcsrc
  to /usr/share/fpcsrc/${FPCVERSION}. This allow installing more than on FPC
  release.
* Fixed far call issue in compiler preventing building huge binearies.
  (closes: #477743)
* Updated building dependencies, recomennded and suggested packages.
* Moved fppkg to fp-utils as it is just a helper tool and is not required by
  compiler.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
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
   PGtkInvisible = ^TGtkInvisible;
 
10
   TGtkInvisible = record
 
11
        widget : TGtkWidget;
 
12
        has_user_ref_count : gboolean;
 
13
        screen : PGdkScreen;
 
14
     end;
 
15
 
 
16
{ Padding for future expansion  }
 
17
   PGtkInvisibleClass = ^TGtkInvisibleClass;
 
18
   TGtkInvisibleClass = record
 
19
        parent_class : TGtkWidgetClass;
 
20
        _gtk_reserved1 : procedure ; cdecl;
 
21
        _gtk_reserved2 : procedure ; cdecl;
 
22
        _gtk_reserved3 : procedure ; cdecl;
 
23
        _gtk_reserved4 : procedure ; cdecl;
 
24
     end;
 
25
 
 
26
{$ENDIF read_interface_types}
 
27
 
 
28
//------------------------------------------------------------------------------
 
29
 
 
30
{$IFDEF read_interface_rest}
 
31
function GTK_TYPE_INVISIBLE : GType;
 
32
function GTK_INVISIBLE(obj: pointer) : PGtkInvisible;
 
33
function GTK_INVISIBLE_CLASS(klass: pointer) : PGtkInvisibleClass;
 
34
function GTK_IS_INVISIBLE(obj: pointer) : boolean;
 
35
function GTK_IS_INVISIBLE_CLASS(klass: pointer) : boolean;
 
36
function GTK_INVISIBLE_GET_CLASS(obj: pointer) : PGtkInvisibleClass;
 
37
 
 
38
 
 
39
function gtk_invisible_get_type:TGtkType; cdecl; external gtklib;
 
40
function gtk_invisible_new:PGtkWidget; cdecl; external gtklib;
 
41
function gtk_invisible_new_for_screen(screen:PGdkScreen):PGtkWidget; cdecl; external gtklib;
 
42
procedure gtk_invisible_set_screen(invisible:PGtkInvisible; screen:PGdkScreen); cdecl; external gtklib;
 
43
function gtk_invisible_get_screen(invisible:PGtkInvisible):PGdkScreen; cdecl; external gtklib;
 
44
{$ENDIF read_interface_rest}
 
45
 
 
46
//------------------------------------------------------------------------------
 
47
 
 
48
{$IFDEF read_implementation}
 
49
function GTK_TYPE_INVISIBLE : GType;
 
50
begin
 
51
   GTK_TYPE_INVISIBLE:=gtk_invisible_get_type;
 
52
end;
 
53
 
 
54
function GTK_INVISIBLE(obj: pointer) : PGtkInvisible;
 
55
begin
 
56
   GTK_INVISIBLE:=PGtkInvisible(GTK_CHECK_CAST(obj,GTK_TYPE_INVISIBLE));
 
57
end;
 
58
 
 
59
function GTK_INVISIBLE_CLASS(klass: pointer) : PGtkInvisibleClass;
 
60
begin
 
61
   GTK_INVISIBLE_CLASS:=PGtkInvisibleClass(GTK_CHECK_CLASS_CAST(klass,GTK_TYPE_INVISIBLE));
 
62
end;
 
63
 
 
64
function GTK_IS_INVISIBLE(obj: pointer) : boolean;
 
65
begin
 
66
   GTK_IS_INVISIBLE:=GTK_CHECK_TYPE(obj,GTK_TYPE_INVISIBLE);
 
67
end;
 
68
 
 
69
function GTK_IS_INVISIBLE_CLASS(klass: pointer) : boolean;
 
70
begin
 
71
   GTK_IS_INVISIBLE_CLASS:=GTK_CHECK_CLASS_TYPE(klass,GTK_TYPE_INVISIBLE);
 
72
end;
 
73
 
 
74
function GTK_INVISIBLE_GET_CLASS(obj: pointer) : PGtkInvisibleClass;
 
75
begin
 
76
   GTK_INVISIBLE_GET_CLASS:=PGtkInvisibleClass(GTK_CHECK_GET_CLASS(obj,GTK_TYPE_INVISIBLE));
 
77
end;
 
78
 
 
79
{$ENDIF read_implementation}
 
80
// included by gtk2.pas
 
81