PageRenderTime 30ms CodeModel.GetById 20ms app.highlight 8ms RepoModel.GetById 1ms app.codeStats 0ms

/packages/gtk1/src/gtk/gtkrc.pp

https://github.com/slibre/freepascal
Puppet | 69 lines | 55 code | 14 blank | 0 comment | 0 complexity | 571b8cce36db8afdd978906964943323 MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
 1{
 2}
 3
 4{****************************************************************************
 5                                 Interface
 6****************************************************************************}
 7
 8{$ifdef read_interface}
 9
10{******************************
11  types inserted in gtkwidget
12******************************}
13
14procedure gtk_rc_init;cdecl;external gtkdll name 'gtk_rc_init';
15procedure gtk_rc_add_default_file(filename:Pgchar);cdecl;external gtkdll name 'gtk_rc_add_default_file';
16procedure gtk_rc_set_default_files(filenames:PPgchar);cdecl;external gtkdll name 'gtk_rc_set_default_files';
17function  gtk_rc_get_default_files:PPgchar;cdecl;external gtkdll name 'gtk_rc_get_default_files';
18procedure gtk_rc_parse(filename:Pgchar);cdecl;external gtkdll name 'gtk_rc_parse';
19procedure gtk_rc_parse_string(rc_string:Pgchar);cdecl;external gtkdll name 'gtk_rc_parse_string';
20function  gtk_rc_get_style(widget:PGtkWidget):PGtkStyle;cdecl;external gtkdll name 'gtk_rc_get_style';
21procedure gtk_rc_add_widget_name_style(rc_style:PGtkRcStyle; pattern:Pgchar);cdecl;external gtkdll name 'gtk_rc_add_widget_name_style';
22procedure gtk_rc_add_widget_class_style(rc_style:PGtkRcStyle; pattern:Pgchar);cdecl;external gtkdll name 'gtk_rc_add_widget_class_style';
23procedure gtk_rc_add_class_style(rc_style:PGtkRcStyle; pattern:Pgchar);cdecl;external gtkdll name 'gtk_rc_add_class_style';
24function  gtk_rc_style_new:PGtkRcStyle;cdecl;external gtkdll name 'gtk_rc_style_new';
25procedure gtk_rc_style_ref(rc_style:PGtkRcStyle);cdecl;external gtkdll name 'gtk_rc_style_ref';
26procedure gtk_rc_style_unref(rc_style:PGtkRcStyle);cdecl;external gtkdll name 'gtk_rc_style_unref';
27
28  type
29     TGtkImageLoader = function (window:PGdkWindow; colormap:PGdkColormap; mask:PPGdkBitmap; transparent_color:PGdkColor; filename:Pgchar):PGdkPixmap;cdecl;
30
31procedure gtk_rc_set_image_loader(loader:TGtkImageLoader);cdecl;external gtkdll name 'gtk_rc_set_image_loader';
32function  gtk_rc_load_image(colormap:PGdkColormap; transparent_color:PGdkColor; filename:Pgchar):PGdkPixmap;cdecl;external gtkdll name 'gtk_rc_load_image';
33function  gtk_rc_find_pixmap_in_path(scanner:PGScanner; pixmap_file:Pgchar):Pgchar;cdecl;external gtkdll name 'gtk_rc_find_pixmap_in_path';
34function  gtk_rc_find_module_in_path(module_file:Pgchar):Pgchar;cdecl;external gtkdll name 'gtk_rc_find_module_in_path';
35function  gtk_rc_get_theme_dir:Pgchar;cdecl;external gtkdll name 'gtk_rc_get_theme_dir';
36function  gtk_rc_get_module_dir:Pgchar;cdecl;external gtkdll name 'gtk_rc_get_module_dir';
37
38  type
39     TGtkRcTokenType = (GTK_RC_TOKEN_INVALID := G_TOKEN_LAST,GTK_RC_TOKEN_INCLUDE,
40       GTK_RC_TOKEN_NORMAL,GTK_RC_TOKEN_ACTIVE,
41       GTK_RC_TOKEN_PRELIGHT,GTK_RC_TOKEN_SELECTED,
42       GTK_RC_TOKEN_INSENSITIVE,GTK_RC_TOKEN_FG,
43       GTK_RC_TOKEN_BG,GTK_RC_TOKEN_BASE,GTK_RC_TOKEN_TEXT,
44       GTK_RC_TOKEN_FONT,GTK_RC_TOKEN_FONTSET,
45       GTK_RC_TOKEN_BG_PIXMAP,GTK_RC_TOKEN_PIXMAP_PATH,
46       GTK_RC_TOKEN_STYLE,GTK_RC_TOKEN_BINDING,
47       GTK_RC_TOKEN_BIND,GTK_RC_TOKEN_WIDGET,
48       GTK_RC_TOKEN_WIDGET_CLASS,GTK_RC_TOKEN_CLASS,
49       GTK_RC_TOKEN_LOWEST,GTK_RC_TOKEN_GTK,
50       GTK_RC_TOKEN_APPLICATION,GTK_RC_TOKEN_RC,
51       GTK_RC_TOKEN_HIGHEST,GTK_RC_TOKEN_ENGINE,
52       GTK_RC_TOKEN_MODULE_PATH,GTK_RC_TOKEN_LAST
53       );
54
55function  gtk_rc_parse_color(scanner:PGScanner; color:PGdkColor):guint;cdecl;external gtkdll name 'gtk_rc_parse_color';
56function  gtk_rc_parse_state(scanner:PGScanner; state:PGtkStateType):guint;cdecl;external gtkdll name 'gtk_rc_parse_state';
57function  gtk_rc_parse_priority(scanner:PGScanner; priority:PGtkPathPriorityType):guint;cdecl;external gtkdll name 'gtk_rc_parse_priority';
58
59{$endif read_interface}
60
61
62{****************************************************************************
63                              Implementation
64****************************************************************************}
65
66{$ifdef read_implementation}
67{$endif read_implementation}
68
69