Browse Source

* PChar -> PAnsichar

Michaël Van Canneyt 2 years ago
parent
commit
ee3059f440
32 changed files with 352 additions and 352 deletions
  1. 2 2
      packages/gnome1/examples/gconfexample.pp
  2. 1 1
      packages/gnome1/examples/gnometest.pp
  3. 10 10
      packages/gnome1/examples/testzvt.pp
  4. 1 1
      packages/gnome1/src/gconf/gconf.pp
  5. 3 3
      packages/gnome1/src/libart.pp
  6. 145 145
      packages/gnome1/src/libgnome/gnomeconfig.inc
  7. 17 17
      packages/gnome1/src/libgnome/gnomedentry.inc
  8. 6 6
      packages/gnome1/src/libgnome/gnomeexec.inc
  9. 3 3
      packages/gnome1/src/libgnome/gnomei18n.inc
  10. 12 12
      packages/gnome1/src/libgnome/gnomemetadata.inc
  11. 5 5
      packages/gnome1/src/libgnome/gnomemime.inc
  12. 8 8
      packages/gnome1/src/libgnome/gnomemimeinfo.inc
  13. 2 2
      packages/gnome1/src/libgnome/gnomeremote.inc
  14. 3 3
      packages/gnome1/src/libgnome/gnomesound.inc
  15. 6 6
      packages/gnome1/src/libgnome/gnometriggers.inc
  16. 1 1
      packages/gnome1/src/libgnome/gnomeurl.inc
  17. 18 18
      packages/gnome1/src/libgnome/gnomeutil.inc
  18. 9 9
      packages/gnome1/src/libgnome/libgnome.pp
  19. 16 16
      packages/gnome1/src/libgnomeui/gnomeapphelper.inc
  20. 1 1
      packages/gnome1/src/libgnomeui/gnomecanvas.inc
  21. 1 1
      packages/gnome1/src/libgnomeui/gnomecanvastext.inc
  22. 2 2
      packages/gnome1/src/libgnomeui/gnomedock.inc
  23. 7 7
      packages/gnome1/src/libgnomeui/gnomefileentry.inc
  24. 5 5
      packages/gnome1/src/libgnomeui/gnomeiconitem.inc
  25. 6 6
      packages/gnome1/src/libgnomeui/gnomeiconlist.inc
  26. 2 2
      packages/gnome1/src/libgnomeui/gnomeinit.inc
  27. 8 8
      packages/gnome1/src/libgnomeui/gnomepixmap.inc
  28. 27 27
      packages/gnome1/src/libgnomeui/gnomestock.inc
  29. 1 1
      packages/gnome1/src/libgnomeui/libgnomeui.pp
  30. 11 11
      packages/gnome1/src/zvt/libzvt.pp
  31. 7 7
      packages/gnome1/src/zvt/vt.inc
  32. 6 6
      packages/gnome1/src/zvt/vtx.inc

+ 2 - 2
packages/gnome1/examples/gconfexample.pp

@@ -3,8 +3,8 @@ Program gconfexample;
 Uses glib, gtk, gconf, gconfclient;
 Uses glib, gtk, gconf, gconfclient;
 
 
 Const
 Const
-  PATH : PChar = '/apps/GNOMEnclature/gconf_example';
-  KEY : PChar= '/apps/GNOMEnclature/gconf_example/my_option';
+  PATH : PAnsiChar = '/apps/GNOMEnclature/gconf_example';
+  KEY : PAnsiChar= '/apps/GNOMEnclature/gconf_example/my_option';
 
 
 { Update the GConf key when the user toggles the check button. }
 { Update the GConf key when the user toggles the check button. }
 Procedure button_toggled_cb (button : PGtkWidget; data : gpointer); cdecl;
 Procedure button_toggled_cb (button : PGtkWidget; data : gpointer); cdecl;

+ 1 - 1
packages/gnome1/examples/gnometest.pp

@@ -3,7 +3,7 @@ Program gnometest;
 uses glib, gdk, gtk, libgnome, libgnomeui;
 uses glib, gdk, gtk, libgnome, libgnomeui;
 
 
 const
 const
-  Authors : Array[0..2] of Pchar = ('me', 'myself', 'I');
+  Authors : Array[0..2] of PAnsiChar = ('me', 'myself', 'I');
 var
 var
   AboutBox : PGTKWidget;
   AboutBox : PGTKWidget;
   App : PGTKWidget;
   App : PGTKWidget;

+ 10 - 10
packages/gnome1/examples/testzvt.pp

@@ -44,22 +44,22 @@ Uses
 const
 const
   (* what to execvp in terminal widget *)
   (* what to execvp in terminal widget *)
   {$Ifdef exec_mc}
   {$Ifdef exec_mc}
-    Command : PChar = 'mc';
-    Params : array[0..1] of PChar = ('TERM=xterm', nil);
+    Command : PAnsiChar = 'mc';
+    Params : array[0..1] of PAnsiChar = ('TERM=xterm', nil);
   {$else}
   {$else}
-    Command : PChar = 'sh';
-    Params : array[0..0] of PChar = (nil);
+    Command : PAnsiChar = 'sh';
+    Params : array[0..0] of PAnsiChar = (nil);
   {$EndIf}
   {$EndIf}
   Terminals : Longint = 0;//# of terminals currently open
   Terminals : Longint = 0;//# of terminals currently open
 
 
   (* Program Information for GNOME & About Box *)
   (* Program Information for GNOME & About Box *)
-  ProgramName : PChar = 'TestZVT';
-  ProgramVersion : PChar = '1.0';
+  ProgramName : PAnsiChar = 'TestZVT';
+  ProgramVersion : PAnsiChar = '1.0';
 
 
   (* Information for About Box *)
   (* Information for About Box *)
-  Copyright : PChar = 'Copyright (C) 2002 Andrew Johnson';
-  Authors : array[0..1] of PChar = ('Andrew Johnson <[email protected]>', nil);
-  Comments : PChar = 'An FPC Example Program demonstrating the most common use of ZVTTerm in a GNOME application.';
+  Copyright : PAnsiChar = 'Copyright (C) 2002 Andrew Johnson';
+  Authors : array[0..1] of PAnsiChar = ('Andrew Johnson <[email protected]>', nil);
+  Comments : PAnsiChar = 'An FPC Example Program demonstrating the most common use of ZVTTerm in a GNOME application.';
 
 
 var
 var
   app, mdichild : pointer;
   app, mdichild : pointer;
@@ -136,7 +136,7 @@ begin
   (* Pack Box *)
   (* Pack Box *)
   gtk_box_pack_start(hBox, term, TRUE, TRUE, 0);
   gtk_box_pack_start(hBox, term, TRUE, TRUE, 0);
   gtk_box_pack_start(hBox, sb, FALSE, TRUE, 0);
   gtk_box_pack_start(hBox, sb, FALSE, TRUE, 0);
-  gtk_object_set_data(hbox, 'caption', Pchar('Terminal #' + IntToStr(Terminals)));
+  gtk_object_set_data(hbox, 'caption', PAnsiChar('Terminal #' + IntToStr(Terminals)));
   gtk_widget_show_all(hBox);
   gtk_widget_show_all(hBox);
   NewTerminalView := hBox;
   NewTerminalView := hBox;
   Inc(Terminals);
   Inc(Terminals);

+ 1 - 1
packages/gnome1/src/gconf/gconf.pp

@@ -131,7 +131,7 @@ type
 
 
 function gconf_string_to_enum(lookup_table:array of TGConfEnumStringPair; str:Pgchar; enum_value_retloc:Pgint):gboolean;cdecl;external gconfdll name 'gconf_string_to_enum';
 function gconf_string_to_enum(lookup_table:array of TGConfEnumStringPair; str:Pgchar; enum_value_retloc:Pgint):gboolean;cdecl;external gconfdll name 'gconf_string_to_enum';
 function gconf_enum_to_string(lookup_table:array of TGConfEnumStringPair; enum_value:gint):pgchar;cdecl;external gconfdll name 'gconf_enum_to_string';
 function gconf_enum_to_string(lookup_table:array of TGConfEnumStringPair; enum_value:gint):pgchar;cdecl;external gconfdll name 'gconf_enum_to_string';
-function gconf_init(argc:longint; argv:PPchar; err:PPGError):gboolean;cdecl;external gconfdll name 'gconf_init';
+function gconf_init(argc:longint; argv:PPAnsiChar; err:PPGError):gboolean;cdecl;external gconfdll name 'gconf_init';
 
 
 implementation
 implementation
 
 

+ 3 - 3
packages/gnome1/src/libart.pp

@@ -24,7 +24,7 @@ type
   art_boolean = boolean;
   art_boolean = boolean;
 
 
   Taffine_array = array[0..5] of double;
   Taffine_array = array[0..5] of double;
-  Taffine_string = array[0..127] of char;
+  Taffine_string = array[0..127] of AnsiChar;
 
 
   TArtPathcode = (ART_MOVETO,ART_MOVETO_OPEN,ART_CURVETO,ART_LINETO,ART_END);
   TArtPathcode = (ART_MOVETO,ART_MOVETO_OPEN,ART_CURVETO,ART_LINETO,ART_END);
   TArtFilterLevel = (ART_FILTER_NEAREST,ART_FILTER_TILES,ART_FILTER_BILINEAR,ART_FILTER_HYPER);
   TArtFilterLevel = (ART_FILTER_NEAREST,ART_FILTER_TILES,ART_FILTER_BILINEAR,ART_FILTER_HYPER);
@@ -151,8 +151,8 @@ const
    ART_UTILE_SHIFT = 5;
    ART_UTILE_SHIFT = 5;
    ART_UTILE_SIZE = 1 shl ART_UTILE_SHIFT;
    ART_UTILE_SIZE = 1 shl ART_UTILE_SHIFT;
 
 
-procedure art_die(fmt:Pchar; args:array of const);cdecl;external libartdll name 'art_die';
-procedure art_warn(fmt:Pchar; args:array of const);cdecl;external libartdll name 'art_warn';
+procedure art_die(fmt:PAnsiChar; args:array of const);cdecl;external libartdll name 'art_die';
+procedure art_warn(fmt:PAnsiChar; args:array of const);cdecl;external libartdll name 'art_warn';
 
 
 (* ART longint Rect *)
 (* ART longint Rect *)
 procedure art_irect_copy(dest:PArtIRect; src:PArtIRect);cdecl;external libartdll name 'art_irect_copy';
 procedure art_irect_copy(dest:PArtIRect; src:PArtIRect);cdecl;external libartdll name 'art_irect_copy';

+ 145 - 145
packages/gnome1/src/libgnome/gnomeconfig.inc

@@ -1,116 +1,116 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
-function _gnome_config_get_string_with_default(path:Pchar; def:Pgboolean; priv:gint):pchar;cdecl;external libgnomedll name '_gnome_config_get_string_with_default';
-function _gnome_config_get_translated_string_with_default(path:Pchar; def:Pgboolean; priv:gint):pchar;cdecl;external libgnomedll name '_gnome_config_get_translated_string_with_default';
-function _gnome_config_get_int_with_default(path:Pchar; def:Pgboolean; priv:gint):gint;cdecl;external libgnomedll name '_gnome_config_get_int_with_default';
-function _gnome_config_get_float_with_default(path:Pchar; def:Pgboolean; priv:gint):gdouble;cdecl;external libgnomedll name '_gnome_config_get_float_with_default';
-function _gnome_config_get_bool_with_default(path:Pchar; def:Pgboolean; priv:gint):gboolean;cdecl;external libgnomedll name '_gnome_config_get_bool_with_default';
-Procedure _gnome_config_get_vector_with_default(path:Pchar; argcp:Pgint; argvp:PPPchar; def:Pgboolean; priv:gint);cdecl;external libgnomedll name '_gnome_config_get_vector_with_default';
-
-function gnome_config_get_string_with_default(path:Pchar; def:Pgboolean):pchar;
-function gnome_config_get_translated_string_with_default(path:Pchar; def:Pgboolean):pchar;
-function gnome_config_get_int_with_default(path:Pchar; def:Pgboolean):gint;
-function gnome_config_get_float_with_default(path:Pchar; def:Pgboolean):gdouble;
-function gnome_config_get_bool_with_default(path:Pchar; def:Pgboolean):gboolean;
-Procedure gnome_config_get_vector_with_default(path:Pchar; argcp:Pgint; argvp:PPPchar; def:Pgboolean);
-
-function gnome_config_private_get_string_with_default(path:Pchar; def:Pgboolean):pchar;
-function gnome_config_private_get_translated_string_with_default(path:Pchar; def:Pgboolean):pchar;
-function gnome_config_private_get_int_with_default(path:Pchar; def:Pgboolean):gint;
-function gnome_config_private_get_float_with_default(path:Pchar; def:Pgboolean):gdouble;
-function gnome_config_private_get_bool_with_default(path:Pchar; def:Pgboolean):gboolean;
-procedure gnome_config_private_get_vector_with_default(path:Pchar; argcp:Pgint; argvp:PPPchar; def:Pgboolean);
-
-function gnome_config_get_string(path:Pchar):pchar;
-function gnome_config_get_translated_string(path:Pchar):pchar;
-function gnome_config_get_int(path:Pchar):gint;
-function gnome_config_get_float(path:Pchar):gdouble;
-function gnome_config_get_bool(path:Pchar):gboolean;
-procedure gnome_config_get_vector(path:Pchar; argcp:Pgint; argvp:PPPchar);
-
-function gnome_config_private_get_string(path:Pchar):pchar;
-function gnome_config_private_get_translated_string(path:Pchar):pchar;
-function gnome_config_private_get_int(path:Pchar):gint;
-function gnome_config_private_get_float(path:Pchar):gdouble;
-function gnome_config_private_get_bool(path:Pchar):gboolean;
-procedure gnome_config_private_get_vector(path:Pchar; argcp:Pgint; argvp:PPPchar);
-
-procedure _gnome_config_set_string(path:Pchar; value:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_string';
-procedure _gnome_config_set_translated_string(path:Pchar; value:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_translated_string';
-procedure _gnome_config_set_int(path:Pchar; value:longint; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_int';
-procedure _gnome_config_set_float(path:Pchar; value:gdouble; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_float';
-procedure _gnome_config_set_bool(path:Pchar; value:gboolean; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_bool';
-procedure _gnome_config_set_vector(path:Pchar; argc:longint; argv:PPchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_vector';
-
-procedure gnome_config_set_string(path,new_value : Pchar);
-procedure gnome_config_set_translated_string(path, new_value : PChar);
-procedure gnome_config_set_int(path : PChar; new_value : longint);
-procedure gnome_config_set_float(path : PChar; new_value : longint);
-procedure gnome_config_set_bool(path : PChar; new_value : gboolean);
-procedure gnome_config_set_vector(path:Pchar; argc:longint; argv:PPchar);
-
-procedure gnome_config_private_set_string(path,new_value : Pchar);
-procedure gnome_config_private_set_translated_string(path, new_value : PChar);
-procedure gnome_config_private_set_int(path : Pchar; new_value : longint);
-procedure gnome_config_private_set_float(path : PChar; new_value : longint);
-procedure gnome_config_private_set_bool(path : PChar; new_value : gboolean);
-procedure gnome_config_private_set_vector(path:Pchar; argc:longint; argv:PPchar);
-
-function _gnome_config_has_section(path:Pchar; priv:gint):gboolean;cdecl;external libgnomedll name '_gnome_config_has_section';
-
-function gnome_config_has_section(path : Pchar) : gboolean;
-
-function gnome_config_private_has_section(path : pchar) : gboolean;
-
-function _gnome_config_init_iterator(path:Pchar; priv:gint):pointer;cdecl;external libgnomedll name '_gnome_config_init_iterator';
-function _gnome_config_init_iterator_sections(path:Pchar; priv:gint):pointer;cdecl;external libgnomedll name '_gnome_config_init_iterator_sections';
-function gnome_config_iterator_next(iterator_handle:pointer; key:PPchar; value:PPchar):pointer;cdecl;external libgnomedll name 'gnome_config_iterator_next';
-
-function gnome_config_init_iterator(path : pchar) : pointer;
-function gnome_config_init_iterator_sections(path : Pchar) : pointer;
-
-function gnome_config_private_init_iterator(path : Pchar) : pointer;
-function gnome_config_private_init_iterator_sections(path : Pchar) : pointer;
+function _gnome_config_get_string_with_default(path:PAnsiChar; def:Pgboolean; priv:gint):PAnsiChar;cdecl;external libgnomedll name '_gnome_config_get_string_with_default';
+function _gnome_config_get_translated_string_with_default(path:PAnsiChar; def:Pgboolean; priv:gint):PAnsiChar;cdecl;external libgnomedll name '_gnome_config_get_translated_string_with_default';
+function _gnome_config_get_int_with_default(path:PAnsiChar; def:Pgboolean; priv:gint):gint;cdecl;external libgnomedll name '_gnome_config_get_int_with_default';
+function _gnome_config_get_float_with_default(path:PAnsiChar; def:Pgboolean; priv:gint):gdouble;cdecl;external libgnomedll name '_gnome_config_get_float_with_default';
+function _gnome_config_get_bool_with_default(path:PAnsiChar; def:Pgboolean; priv:gint):gboolean;cdecl;external libgnomedll name '_gnome_config_get_bool_with_default';
+Procedure _gnome_config_get_vector_with_default(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar; def:Pgboolean; priv:gint);cdecl;external libgnomedll name '_gnome_config_get_vector_with_default';
+
+function gnome_config_get_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
+function gnome_config_get_translated_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
+function gnome_config_get_int_with_default(path:PAnsiChar; def:Pgboolean):gint;
+function gnome_config_get_float_with_default(path:PAnsiChar; def:Pgboolean):gdouble;
+function gnome_config_get_bool_with_default(path:PAnsiChar; def:Pgboolean):gboolean;
+Procedure gnome_config_get_vector_with_default(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar; def:Pgboolean);
+
+function gnome_config_private_get_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
+function gnome_config_private_get_translated_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
+function gnome_config_private_get_int_with_default(path:PAnsiChar; def:Pgboolean):gint;
+function gnome_config_private_get_float_with_default(path:PAnsiChar; def:Pgboolean):gdouble;
+function gnome_config_private_get_bool_with_default(path:PAnsiChar; def:Pgboolean):gboolean;
+procedure gnome_config_private_get_vector_with_default(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar; def:Pgboolean);
+
+function gnome_config_get_string(path:PAnsiChar):PAnsiChar;
+function gnome_config_get_translated_string(path:PAnsiChar):PAnsiChar;
+function gnome_config_get_int(path:PAnsiChar):gint;
+function gnome_config_get_float(path:PAnsiChar):gdouble;
+function gnome_config_get_bool(path:PAnsiChar):gboolean;
+procedure gnome_config_get_vector(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar);
+
+function gnome_config_private_get_string(path:PAnsiChar):PAnsiChar;
+function gnome_config_private_get_translated_string(path:PAnsiChar):PAnsiChar;
+function gnome_config_private_get_int(path:PAnsiChar):gint;
+function gnome_config_private_get_float(path:PAnsiChar):gdouble;
+function gnome_config_private_get_bool(path:PAnsiChar):gboolean;
+procedure gnome_config_private_get_vector(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar);
+
+procedure _gnome_config_set_string(path:PAnsiChar; value:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_string';
+procedure _gnome_config_set_translated_string(path:PAnsiChar; value:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_translated_string';
+procedure _gnome_config_set_int(path:PAnsiChar; value:longint; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_int';
+procedure _gnome_config_set_float(path:PAnsiChar; value:gdouble; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_float';
+procedure _gnome_config_set_bool(path:PAnsiChar; value:gboolean; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_bool';
+procedure _gnome_config_set_vector(path:PAnsiChar; argc:longint; argv:PPAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_set_vector';
+
+procedure gnome_config_set_string(path,new_value : PAnsiChar);
+procedure gnome_config_set_translated_string(path, new_value : PAnsiChar);
+procedure gnome_config_set_int(path : PAnsiChar; new_value : longint);
+procedure gnome_config_set_float(path : PAnsiChar; new_value : longint);
+procedure gnome_config_set_bool(path : PAnsiChar; new_value : gboolean);
+procedure gnome_config_set_vector(path:PAnsiChar; argc:longint; argv:PPAnsiChar);
+
+procedure gnome_config_private_set_string(path,new_value : PAnsiChar);
+procedure gnome_config_private_set_translated_string(path, new_value : PAnsiChar);
+procedure gnome_config_private_set_int(path : PAnsiChar; new_value : longint);
+procedure gnome_config_private_set_float(path : PAnsiChar; new_value : longint);
+procedure gnome_config_private_set_bool(path : PAnsiChar; new_value : gboolean);
+procedure gnome_config_private_set_vector(path:PAnsiChar; argc:longint; argv:PPAnsiChar);
+
+function _gnome_config_has_section(path:PAnsiChar; priv:gint):gboolean;cdecl;external libgnomedll name '_gnome_config_has_section';
+
+function gnome_config_has_section(path : PAnsiChar) : gboolean;
+
+function gnome_config_private_has_section(path : PAnsiChar) : gboolean;
+
+function _gnome_config_init_iterator(path:PAnsiChar; priv:gint):pointer;cdecl;external libgnomedll name '_gnome_config_init_iterator';
+function _gnome_config_init_iterator_sections(path:PAnsiChar; priv:gint):pointer;cdecl;external libgnomedll name '_gnome_config_init_iterator_sections';
+function gnome_config_iterator_next(iterator_handle:pointer; key:PPAnsiChar; value:PPAnsiChar):pointer;cdecl;external libgnomedll name 'gnome_config_iterator_next';
+
+function gnome_config_init_iterator(path : PAnsiChar) : pointer;
+function gnome_config_init_iterator_sections(path : PAnsiChar) : pointer;
+
+function gnome_config_private_init_iterator(path : PAnsiChar) : pointer;
+function gnome_config_private_init_iterator_sections(path : PAnsiChar) : pointer;
 
 
 procedure gnome_config_drop_all;cdecl;external libgnomedll name 'gnome_config_drop_all';
 procedure gnome_config_drop_all;cdecl;external libgnomedll name 'gnome_config_drop_all';
 procedure gnome_config_sync;cdecl;external libgnomedll name 'gnome_config_sync';
 procedure gnome_config_sync;cdecl;external libgnomedll name 'gnome_config_sync';
-procedure _gnome_config_sync_file(path:Pchar; priv:longint);cdecl;external libgnomedll name '_gnome_config_sync_file';
+procedure _gnome_config_sync_file(path:PAnsiChar; priv:longint);cdecl;external libgnomedll name '_gnome_config_sync_file';
 
 
-procedure gnome_config_sync_file(path : Pchar);
+procedure gnome_config_sync_file(path : PAnsiChar);
 
 
-procedure gnome_config_private_sync_file(path : Pchar);
+procedure gnome_config_private_sync_file(path : PAnsiChar);
 
 
-procedure _gnome_config_drop_file(path:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_drop_file';
+procedure _gnome_config_drop_file(path:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_drop_file';
 
 
-procedure gnome_config_drop_file(path : Pchar);
+procedure gnome_config_drop_file(path : PAnsiChar);
 
 
-procedure gnome_config_private_drop_file(path : Pchar);
+procedure gnome_config_private_drop_file(path : PAnsiChar);
 
 
-procedure _gnome_config_clean_file(path:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_file';
+procedure _gnome_config_clean_file(path:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_file';
 
 
-Procedure gnome_config_clean_file(path:Pchar);
+Procedure gnome_config_clean_file(path:PAnsiChar);
 
 
-Procedure gnome_config_private_clean_file(path:Pchar);
+Procedure gnome_config_private_clean_file(path:PAnsiChar);
 
 
-procedure _gnome_config_clean_section(path:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_section';
+procedure _gnome_config_clean_section(path:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_section';
 
 
-procedure gnome_config_clean_section(path:Pchar);
+procedure gnome_config_clean_section(path:PAnsiChar);
 
 
-procedure gnome_config_private_clean_section(path:Pchar);
+procedure gnome_config_private_clean_section(path:PAnsiChar);
 
 
-procedure _gnome_config_clean_key(path:Pchar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_key';
+procedure _gnome_config_clean_key(path:PAnsiChar; priv:gint);cdecl;external libgnomedll name '_gnome_config_clean_key';
 
 
-procedure gnome_config_clean_key(path:Pchar);
+procedure gnome_config_clean_key(path:PAnsiChar);
 
 
-procedure gnome_config_private_clean_key(path:Pchar);
+procedure gnome_config_private_clean_key(path:PAnsiChar);
 
 
-function gnome_config_get_real_path(path:Pchar):Pchar;
+function gnome_config_get_real_path(path:PAnsiChar):PAnsiChar;
 
 
-function gnome_config_private_get_real_path(path:Pchar):Pchar;
+function gnome_config_private_get_real_path(path:PAnsiChar):PAnsiChar;
 
 
-procedure gnome_config_push_prefix(path:Pchar);cdecl;external libgnomedll name 'gnome_config_push_prefix';
+procedure gnome_config_push_prefix(path:PAnsiChar);cdecl;external libgnomedll name 'gnome_config_push_prefix';
 procedure gnome_config_pop_prefix;cdecl;external libgnomedll name 'gnome_config_pop_prefix';
 procedure gnome_config_pop_prefix;cdecl;external libgnomedll name 'gnome_config_pop_prefix';
-procedure gnome_config_make_vector(_string:Pchar; argcp:Plongint; argvp:PPPchar);cdecl;external libgnomedll name 'gnome_config_make_vector';
-function gnome_config_assemble_vector(argc:longint; argv:PPchar):pchar;cdecl;external libgnomedll name 'gnome_config_assemble_vector';
+procedure gnome_config_make_vector(_string:PAnsiChar; argcp:Plongint; argvp:PPPAnsiChar);cdecl;external libgnomedll name 'gnome_config_make_vector';
+function gnome_config_assemble_vector(argc:longint; argv:PPAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_config_assemble_vector';
 
 
 Type
 Type
   TGnomeConfigHandler = procedure (param : pointer); cdecl;
   TGnomeConfigHandler = procedure (param : pointer); cdecl;
@@ -122,272 +122,272 @@ procedure gnome_config_set_sync_handler(func:TGnomeConfigHandler; data:pointer);
 
 
 {$Ifdef read_implementation}
 {$Ifdef read_implementation}
 
 
-function gnome_config_get_string_with_default(path:Pchar; def:Pgboolean):pchar;
+function gnome_config_get_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
 begin
 begin
    gnome_config_get_string_with_default:=_gnome_config_get_string_with_default(path,def,0);
    gnome_config_get_string_with_default:=_gnome_config_get_string_with_default(path,def,0);
 end;
 end;
 
 
-function gnome_config_get_translated_string_with_default(path:Pchar; def:Pgboolean):pchar;
+function gnome_config_get_translated_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
 begin
 begin
    gnome_config_get_translated_string_with_default:=_gnome_config_get_translated_string_with_default(path,def,0);
    gnome_config_get_translated_string_with_default:=_gnome_config_get_translated_string_with_default(path,def,0);
 end;
 end;
 
 
-function gnome_config_get_int_with_default(path:Pchar; def:Pgboolean):gint;
+function gnome_config_get_int_with_default(path:PAnsiChar; def:Pgboolean):gint;
 begin
 begin
    gnome_config_get_int_with_default:=_gnome_config_get_int_with_default(path,def,0);
    gnome_config_get_int_with_default:=_gnome_config_get_int_with_default(path,def,0);
 end;
 end;
 
 
-function gnome_config_get_float_with_default(path:Pchar; def:Pgboolean):gdouble;
+function gnome_config_get_float_with_default(path:PAnsiChar; def:Pgboolean):gdouble;
 begin
 begin
    gnome_config_get_float_with_default:=_gnome_config_get_float_with_default(path,def,0);
    gnome_config_get_float_with_default:=_gnome_config_get_float_with_default(path,def,0);
 end;
 end;
 
 
-function gnome_config_get_bool_with_default(path:Pchar; def:Pgboolean):gboolean;
+function gnome_config_get_bool_with_default(path:PAnsiChar; def:Pgboolean):gboolean;
 begin
 begin
    gnome_config_get_bool_with_default:=_gnome_config_get_bool_with_default(path,def,0);
    gnome_config_get_bool_with_default:=_gnome_config_get_bool_with_default(path,def,0);
 end;
 end;
 
 
-procedure gnome_config_get_vector_with_default(path:Pchar; argcp:Pgint; argvp:PPPchar; def:Pgboolean);
+procedure gnome_config_get_vector_with_default(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar; def:Pgboolean);
 begin
 begin
    _gnome_config_get_vector_with_default(path,argcp,argvp,def,0);
    _gnome_config_get_vector_with_default(path,argcp,argvp,def,0);
 end;
 end;
 
 
-function gnome_config_private_get_string_with_default(path:Pchar; def:Pgboolean):pchar;
+function gnome_config_private_get_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
 begin
 begin
    gnome_config_private_get_string_with_default:=_gnome_config_get_string_with_default(path,def,1);
    gnome_config_private_get_string_with_default:=_gnome_config_get_string_with_default(path,def,1);
 end;
 end;
 
 
-function gnome_config_private_get_translated_string_with_default(path:Pchar; def:Pgboolean):pchar;
+function gnome_config_private_get_translated_string_with_default(path:PAnsiChar; def:Pgboolean):PAnsiChar;
 begin
 begin
    gnome_config_private_get_translated_string_with_default:=_gnome_config_get_translated_string_with_default(path,def,1);
    gnome_config_private_get_translated_string_with_default:=_gnome_config_get_translated_string_with_default(path,def,1);
 end;
 end;
 
 
-function gnome_config_private_get_int_with_default(path:Pchar; def:Pgboolean):gint;
+function gnome_config_private_get_int_with_default(path:PAnsiChar; def:Pgboolean):gint;
 begin
 begin
    gnome_config_private_get_int_with_default:=_gnome_config_get_int_with_default(path,def,1);
    gnome_config_private_get_int_with_default:=_gnome_config_get_int_with_default(path,def,1);
 end;
 end;
 
 
-function gnome_config_private_get_float_with_default(path:Pchar; def:Pgboolean):gdouble;
+function gnome_config_private_get_float_with_default(path:PAnsiChar; def:Pgboolean):gdouble;
 begin
 begin
    gnome_config_private_get_float_with_default:=_gnome_config_get_float_with_default(path,def,1);
    gnome_config_private_get_float_with_default:=_gnome_config_get_float_with_default(path,def,1);
 end;
 end;
 
 
-function gnome_config_private_get_bool_with_default(path:Pchar; def:Pgboolean):gboolean;
+function gnome_config_private_get_bool_with_default(path:PAnsiChar; def:Pgboolean):gboolean;
 begin
 begin
    gnome_config_private_get_bool_with_default:=_gnome_config_get_bool_with_default(path,def,1);
    gnome_config_private_get_bool_with_default:=_gnome_config_get_bool_with_default(path,def,1);
 end;
 end;
 
 
-procedure gnome_config_private_get_vector_with_default(path:Pchar; argcp:Pgint; argvp:PPPchar; def:Pgboolean);
+procedure gnome_config_private_get_vector_with_default(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar; def:Pgboolean);
 begin
 begin
    _gnome_config_get_vector_with_default(path,argcp,argvp,def,1);
    _gnome_config_get_vector_with_default(path,argcp,argvp,def,1);
 end;
 end;
 
 
-function gnome_config_get_string(path:Pchar):pchar;
+function gnome_config_get_string(path:PAnsiChar):PAnsiChar;
 begin
 begin
    gnome_config_get_string:=_gnome_config_get_string_with_default(path,nil,0);
    gnome_config_get_string:=_gnome_config_get_string_with_default(path,nil,0);
 end;
 end;
 
 
-function gnome_config_get_translated_string(path:Pchar):pchar;
+function gnome_config_get_translated_string(path:PAnsiChar):PAnsiChar;
 begin
 begin
    gnome_config_get_translated_string:=_gnome_config_get_translated_string_with_default(path,nil,0);
    gnome_config_get_translated_string:=_gnome_config_get_translated_string_with_default(path,nil,0);
 end;
 end;
 
 
-function gnome_config_get_int(path:Pchar):gint;
+function gnome_config_get_int(path:PAnsiChar):gint;
 begin
 begin
    gnome_config_get_int:=_gnome_config_get_int_with_default(path,nil,0);
    gnome_config_get_int:=_gnome_config_get_int_with_default(path,nil,0);
 end;
 end;
 
 
-function gnome_config_get_float(path:Pchar):gdouble;
+function gnome_config_get_float(path:PAnsiChar):gdouble;
 begin
 begin
    gnome_config_get_float:=_gnome_config_get_float_with_default(path,nil,0);
    gnome_config_get_float:=_gnome_config_get_float_with_default(path,nil,0);
 end;
 end;
 
 
-function gnome_config_get_bool(path:Pchar):gboolean;
+function gnome_config_get_bool(path:PAnsiChar):gboolean;
 begin
 begin
    gnome_config_get_bool:=_gnome_config_get_bool_with_default(path,nil,0);
    gnome_config_get_bool:=_gnome_config_get_bool_with_default(path,nil,0);
 end;
 end;
 
 
-procedure gnome_config_get_vector(path:Pchar; argcp:Pgint; argvp:PPPchar);
+procedure gnome_config_get_vector(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar);
 begin
 begin
    _gnome_config_get_vector_with_default(path,argcp,argvp,nil,0);
    _gnome_config_get_vector_with_default(path,argcp,argvp,nil,0);
 end;
 end;
 
 
-function gnome_config_private_get_string(path:Pchar):pchar;
+function gnome_config_private_get_string(path:PAnsiChar):PAnsiChar;
 begin
 begin
    gnome_config_private_get_string:=_gnome_config_get_string_with_default(path,nil,1);
    gnome_config_private_get_string:=_gnome_config_get_string_with_default(path,nil,1);
 end;
 end;
 
 
-function gnome_config_private_get_translated_string(path:Pchar):pchar;
+function gnome_config_private_get_translated_string(path:PAnsiChar):PAnsiChar;
 begin
 begin
    gnome_config_private_get_translated_string:=_gnome_config_get_translated_string_with_default(path,nil,1);
    gnome_config_private_get_translated_string:=_gnome_config_get_translated_string_with_default(path,nil,1);
 end;
 end;
 
 
-function gnome_config_private_get_int(path:Pchar):gint;
+function gnome_config_private_get_int(path:PAnsiChar):gint;
 begin
 begin
    gnome_config_private_get_int:=_gnome_config_get_int_with_default(path,nil,1);
    gnome_config_private_get_int:=_gnome_config_get_int_with_default(path,nil,1);
 end;
 end;
 
 
-function gnome_config_private_get_float(path:Pchar):gdouble;
+function gnome_config_private_get_float(path:PAnsiChar):gdouble;
 begin
 begin
    gnome_config_private_get_float:=_gnome_config_get_float_with_default(path,nil,1);
    gnome_config_private_get_float:=_gnome_config_get_float_with_default(path,nil,1);
 end;
 end;
 
 
-function gnome_config_private_get_bool(path:Pchar):gboolean;
+function gnome_config_private_get_bool(path:PAnsiChar):gboolean;
 begin
 begin
    gnome_config_private_get_bool:=_gnome_config_get_bool_with_default(path,nil,1);
    gnome_config_private_get_bool:=_gnome_config_get_bool_with_default(path,nil,1);
 end;
 end;
 
 
-procedure gnome_config_private_get_vector(path:Pchar; argcp:Pgint; argvp:PPPchar);
+procedure gnome_config_private_get_vector(path:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar);
 begin
 begin
    _gnome_config_get_vector_with_default(path,argcp,argvp,nil,1);
    _gnome_config_get_vector_with_default(path,argcp,argvp,nil,1);
 end;
 end;
 
 
-procedure gnome_config_set_string(path,new_value : Pchar);
+procedure gnome_config_set_string(path,new_value : PAnsiChar);
 begin
 begin
    _gnome_config_set_string(path,new_value,0);
    _gnome_config_set_string(path,new_value,0);
 end;
 end;
 
 
-procedure gnome_config_set_translated_string(path, new_value : PChar);
+procedure gnome_config_set_translated_string(path, new_value : PAnsiChar);
 begin
 begin
    _gnome_config_set_translated_string(path,new_value,0);
    _gnome_config_set_translated_string(path,new_value,0);
 end;
 end;
 
 
-procedure gnome_config_set_int(path : PChar; new_value : longint);
+procedure gnome_config_set_int(path : PAnsiChar; new_value : longint);
 begin
 begin
    _gnome_config_set_int(path,new_value,0);
    _gnome_config_set_int(path,new_value,0);
 end;
 end;
 
 
-procedure gnome_config_set_float(path : PChar; new_value : longint);
+procedure gnome_config_set_float(path : PAnsiChar; new_value : longint);
 begin
 begin
    _gnome_config_set_float(path,new_value,0);
    _gnome_config_set_float(path,new_value,0);
 end;
 end;
 
 
-procedure gnome_config_set_bool(path : PChar; new_value : gboolean);
+procedure gnome_config_set_bool(path : PAnsiChar; new_value : gboolean);
 begin
 begin
    _gnome_config_set_bool(path,new_value,0);
    _gnome_config_set_bool(path,new_value,0);
 end;
 end;
 
 
-procedure gnome_config_set_vector(path:Pchar; argc:longint; argv:PPchar);
+procedure gnome_config_set_vector(path:PAnsiChar; argc:longint; argv:PPAnsiChar);
 begin
 begin
    _gnome_config_set_vector(path,argc,argv,0);
    _gnome_config_set_vector(path,argc,argv,0);
 end;
 end;
 
 
-procedure gnome_config_private_set_string(path,new_value : Pchar);
+procedure gnome_config_private_set_string(path,new_value : PAnsiChar);
 begin
 begin
    _gnome_config_set_string(path,new_value,1);
    _gnome_config_set_string(path,new_value,1);
 end;
 end;
 
 
-procedure gnome_config_private_set_translated_string(path, new_value : PChar);
+procedure gnome_config_private_set_translated_string(path, new_value : PAnsiChar);
 begin
 begin
    _gnome_config_set_translated_string(path,new_value,1);
    _gnome_config_set_translated_string(path,new_value,1);
 end;
 end;
 
 
-procedure gnome_config_private_set_int(path : PChar; new_value : longint);
+procedure gnome_config_private_set_int(path : PAnsiChar; new_value : longint);
 begin
 begin
    _gnome_config_set_int(path,new_value,1);
    _gnome_config_set_int(path,new_value,1);
 end;
 end;
 
 
-procedure gnome_config_private_set_float(path : PChar; new_value : longint);
+procedure gnome_config_private_set_float(path : PAnsiChar; new_value : longint);
 begin
 begin
    _gnome_config_set_float(path,new_value,1);
    _gnome_config_set_float(path,new_value,1);
 end;
 end;
 
 
-procedure gnome_config_private_set_bool(path : PChar; new_value : gboolean);
+procedure gnome_config_private_set_bool(path : PAnsiChar; new_value : gboolean);
 begin
 begin
    _gnome_config_set_bool(path,new_value,1);
    _gnome_config_set_bool(path,new_value,1);
 end;
 end;
 
 
-procedure gnome_config_private_set_vector(path:Pchar; argc:longint; argv:PPchar);
+procedure gnome_config_private_set_vector(path:PAnsiChar; argc:longint; argv:PPAnsiChar);
 begin
 begin
    _gnome_config_set_vector(path,argc,argv,1);
    _gnome_config_set_vector(path,argc,argv,1);
 end;
 end;
 
 
-function gnome_config_has_section(path : Pchar) : gboolean;
+function gnome_config_has_section(path : PAnsiChar) : gboolean;
 begin
 begin
    gnome_config_has_section:=_gnome_config_has_section(path,0);
    gnome_config_has_section:=_gnome_config_has_section(path,0);
 end;
 end;
 
 
-function gnome_config_private_has_section(path : pchar) : gboolean;
+function gnome_config_private_has_section(path : PAnsiChar) : gboolean;
 begin
 begin
    gnome_config_private_has_section:=_gnome_config_has_section(path,1);
    gnome_config_private_has_section:=_gnome_config_has_section(path,1);
 end;
 end;
 
 
-function gnome_config_init_iterator(path : pchar) : pointer;
+function gnome_config_init_iterator(path : PAnsiChar) : pointer;
 begin
 begin
    gnome_config_init_iterator:=_gnome_config_init_iterator(path,0);
    gnome_config_init_iterator:=_gnome_config_init_iterator(path,0);
 end;
 end;
 
 
-function gnome_config_init_iterator_sections(path : Pchar) : pointer;
+function gnome_config_init_iterator_sections(path : PAnsiChar) : pointer;
 begin
 begin
    gnome_config_init_iterator_sections:=_gnome_config_init_iterator_sections(path,0);
    gnome_config_init_iterator_sections:=_gnome_config_init_iterator_sections(path,0);
 end;
 end;
 
 
-function gnome_config_private_init_iterator(path : Pchar) : pointer;
+function gnome_config_private_init_iterator(path : PAnsiChar) : pointer;
 begin
 begin
    gnome_config_private_init_iterator:=_gnome_config_init_iterator(path,1);
    gnome_config_private_init_iterator:=_gnome_config_init_iterator(path,1);
 end;
 end;
 
 
-function gnome_config_private_init_iterator_sections(path : Pchar) : pointer;
+function gnome_config_private_init_iterator_sections(path : PAnsiChar) : pointer;
 begin
 begin
    gnome_config_private_init_iterator_sections:=_gnome_config_init_iterator_sections(path,1);
    gnome_config_private_init_iterator_sections:=_gnome_config_init_iterator_sections(path,1);
 end;
 end;
 
 
-procedure gnome_config_sync_file(path : Pchar);
+procedure gnome_config_sync_file(path : PAnsiChar);
 begin
 begin
    _gnome_config_sync_file(path,0);
    _gnome_config_sync_file(path,0);
 end;
 end;
 
 
-procedure gnome_config_private_sync_file(path : Pchar);
+procedure gnome_config_private_sync_file(path : PAnsiChar);
 begin
 begin
    _gnome_config_sync_file(path,1);
    _gnome_config_sync_file(path,1);
 end;
 end;
 
 
-procedure gnome_config_drop_file(path : Pchar);
+procedure gnome_config_drop_file(path : PAnsiChar);
 begin
 begin
    _gnome_config_drop_file(path,0);
    _gnome_config_drop_file(path,0);
 end;
 end;
 
 
-procedure gnome_config_private_drop_file(path : Pchar);
+procedure gnome_config_private_drop_file(path : PAnsiChar);
 begin
 begin
    _gnome_config_drop_file(path,1);
    _gnome_config_drop_file(path,1);
 end;
 end;
 
 
-Procedure gnome_config_clean_file(path:Pchar);
+Procedure gnome_config_clean_file(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_file(path,0);
    _gnome_config_clean_file(path,0);
 end;
 end;
 
 
-Procedure gnome_config_private_clean_file(path:Pchar);
+Procedure gnome_config_private_clean_file(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_file(path,1);
    _gnome_config_clean_file(path,1);
 end;
 end;
 
 
-procedure gnome_config_clean_section(path:Pchar);
+procedure gnome_config_clean_section(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_section(path,0);
    _gnome_config_clean_section(path,0);
 end;
 end;
 
 
-procedure gnome_config_private_clean_section(path:Pchar);
+procedure gnome_config_private_clean_section(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_section(path,1);
    _gnome_config_clean_section(path,1);
 end;
 end;
 
 
-procedure gnome_config_clean_key(path:Pchar);
+procedure gnome_config_clean_key(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_key(path,0);
    _gnome_config_clean_key(path,0);
 end;
 end;
 
 
-procedure gnome_config_private_clean_key(path:Pchar);
+procedure gnome_config_private_clean_key(path:PAnsiChar);
 begin
 begin
    _gnome_config_clean_key(path,1);
    _gnome_config_clean_key(path,1);
 end;
 end;
 
 
-function gnome_config_get_real_path(path : pchar) : pchar;
+function gnome_config_get_real_path(path : PAnsiChar) : PAnsiChar;
 begin
 begin
   gnome_config_get_real_path := g_concat_dir_and_file(gnome_user_dir, Path);
   gnome_config_get_real_path := g_concat_dir_and_file(gnome_user_dir, Path);
 end;
 end;
 
 
-function gnome_config_private_get_real_path(path : pchar) : pchar;
+function gnome_config_private_get_real_path(path : PAnsiChar) : PAnsiChar;
 begin
 begin
   gnome_config_private_get_real_path := g_concat_dir_and_file(gnome_user_private_dir, Path);
   gnome_config_private_get_real_path := g_concat_dir_and_file(gnome_user_private_dir, Path);
 end;
 end;

+ 17 - 17
packages/gnome1/src/libgnome/gnomedentry.inc

@@ -2,17 +2,17 @@
 type
 type
    PGnomeDesktopEntry = ^TGnomeDesktopEntry;
    PGnomeDesktopEntry = ^TGnomeDesktopEntry;
    TGnomeDesktopEntry = record
    TGnomeDesktopEntry = record
-        name : Pchar;
-        comment : Pchar;
+        name : PAnsiChar;
+        comment : PAnsiChar;
         exec_length : longint;
         exec_length : longint;
-        exec : PPchar;
-        tryexec : Pchar;
-        icon : Pchar;
-        docpath : Pchar;
+        exec : PPAnsiChar;
+        tryexec : PAnsiChar;
+        icon : PAnsiChar;
+        docpath : PAnsiChar;
         terminal : longint;
         terminal : longint;
-        thetype : Pchar;
-        location : Pchar;
-        geometry : Pchar;
+        thetype : PAnsiChar;
+        location : PAnsiChar;
+        geometry : PAnsiChar;
         flag0 : word;
         flag0 : word;
      end;
      end;
 
 
@@ -27,24 +27,24 @@ procedure set_multiple_args(var a : TGnomeDesktopEntry; __multiple_args : Boolea
 function is_kde(var a : TGnomeDesktopEntry) : Boolean;
 function is_kde(var a : TGnomeDesktopEntry) : Boolean;
 procedure set_is_kde(var a : TGnomeDesktopEntry; __is_kde : Boolean);
 procedure set_is_kde(var a : TGnomeDesktopEntry; __is_kde : Boolean);
 
 
-function gnome_desktop_entry_load(afile:Pchar):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load';
-function gnome_desktop_entry_load_flags(afile:Pchar; clean_from_memory_after_load:longint):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_flags';
-function gnome_desktop_entry_load_flags_conditional(afile:Pchar; clean_from_memory_after_load:longint; unconditional:longint):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_flags_conditional';
-function gnome_desktop_entry_load_unconditional(afile:Pchar):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_unconditional';
+function gnome_desktop_entry_load(afile:PAnsiChar):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load';
+function gnome_desktop_entry_load_flags(afile:PAnsiChar; clean_from_memory_after_load:longint):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_flags';
+function gnome_desktop_entry_load_flags_conditional(afile:PAnsiChar; clean_from_memory_after_load:longint; unconditional:longint):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_flags_conditional';
+function gnome_desktop_entry_load_unconditional(afile:PAnsiChar):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_load_unconditional';
 
 
 procedure gnome_desktop_entry_save(dentry:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_save';
 procedure gnome_desktop_entry_save(dentry:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_save';
 procedure gnome_desktop_entry_free(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_free';
 procedure gnome_desktop_entry_free(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_free';
 procedure gnome_desktop_entry_destroy(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_destroy';
 procedure gnome_desktop_entry_destroy(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_destroy';
 procedure gnome_desktop_entry_launch(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_launch';
 procedure gnome_desktop_entry_launch(item:PGnomeDesktopEntry);cdecl;external libgnomedll name 'gnome_desktop_entry_launch';
-procedure gnome_desktop_entry_launch_with_args(item:PGnomeDesktopEntry; the_argc:longint; the_argv:array of Pchar);cdecl;external libgnomedll name 'gnome_desktop_entry_launch_with_args';
+procedure gnome_desktop_entry_launch_with_args(item:PGnomeDesktopEntry; the_argc:longint; the_argv:array of PAnsiChar);cdecl;external libgnomedll name 'gnome_desktop_entry_launch_with_args';
 function gnome_desktop_entry_copy(source:PGnomeDesktopEntry):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_copy';
 function gnome_desktop_entry_copy(source:PGnomeDesktopEntry):PGnomeDesktopEntry;cdecl;external libgnomedll name 'gnome_desktop_entry_copy';
 
 
 type
 type
    PGnomeDesktopEntryI18N = ^TGnomeDesktopEntryI18N;
    PGnomeDesktopEntryI18N = ^TGnomeDesktopEntryI18N;
    TGnomeDesktopEntryI18N = record
    TGnomeDesktopEntryI18N = record
-        lang : Pchar;
-        name : Pchar;
-        comment : Pchar;
+        lang : PAnsiChar;
+        name : PAnsiChar;
+        comment : PAnsiChar;
      end;
      end;
 
 
 function gnome_desktop_entry_get_i18n_list(item:PGnomeDesktopEntry):PGList;cdecl;external libgnomedll name 'gnome_desktop_entry_get_i18n_list';
 function gnome_desktop_entry_get_i18n_list(item:PGnomeDesktopEntry):PGList;cdecl;external libgnomedll name 'gnome_desktop_entry_get_i18n_list';

+ 6 - 6
packages/gnome1/src/libgnome/gnomeexec.inc

@@ -1,11 +1,11 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-function gnome_execute_async(dir:Pchar; argc:longint; argv:PPchar):longint;cdecl;external libgnomedll name 'gnome_execute_async';
-function gnome_execute_async_fds(dir:Pchar; argc:longint; argv:PPchar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_async_fds';
-function gnome_execute_async_with_env(dir:Pchar; argc:longint; argv:PPchar; envc:longint; envv:PPchar):longint;cdecl;external libgnomedll name 'gnome_execute_async_with_env';
-function gnome_execute_async_with_env_fds(dir:Pchar; argc:longint; argv:PPchar; envc:longint; envv:PPchar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_async_with_env_fds';
-function gnome_execute_shell(dir:Pchar; commandline:Pchar):longint;cdecl;external libgnomedll name 'gnome_execute_shell';
-function gnome_execute_shell_fds(dir:Pchar; commandline:Pchar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_shell_fds';
+function gnome_execute_async(dir:PAnsiChar; argc:longint; argv:PPAnsiChar):longint;cdecl;external libgnomedll name 'gnome_execute_async';
+function gnome_execute_async_fds(dir:PAnsiChar; argc:longint; argv:PPAnsiChar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_async_fds';
+function gnome_execute_async_with_env(dir:PAnsiChar; argc:longint; argv:PPAnsiChar; envc:longint; envv:PPAnsiChar):longint;cdecl;external libgnomedll name 'gnome_execute_async_with_env';
+function gnome_execute_async_with_env_fds(dir:PAnsiChar; argc:longint; argv:PPAnsiChar; envc:longint; envv:PPAnsiChar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_async_with_env_fds';
+function gnome_execute_shell(dir:PAnsiChar; commandline:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_execute_shell';
+function gnome_execute_shell_fds(dir:PAnsiChar; commandline:PAnsiChar; close_fds:gboolean):longint;cdecl;external libgnomedll name 'gnome_execute_shell_fds';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 3 - 3
packages/gnome1/src/libgnome/gnomei18n.inc

@@ -1,9 +1,9 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-function gnome_i18n_get_language:Pchar;cdecl;external libgnomedll name 'gnome_i18n_get_language';
+function gnome_i18n_get_language:PAnsiChar;cdecl;external libgnomedll name 'gnome_i18n_get_language';
 function gnome_i18n_get_language_list(category_name:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_i18n_get_language_list';
 function gnome_i18n_get_language_list(category_name:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_i18n_get_language_list';
-procedure gnome_i18n_set_preferred_language(val:Pchar);cdecl;external libgnomedll name 'gnome_i18n_set_preferred_language';
-function gnome_i18n_get_preferred_language:Pchar;cdecl;external libgnomedll name 'gnome_i18n_get_preferred_language';
+procedure gnome_i18n_set_preferred_language(val:PAnsiChar);cdecl;external libgnomedll name 'gnome_i18n_set_preferred_language';
+function gnome_i18n_get_preferred_language:PAnsiChar;cdecl;external libgnomedll name 'gnome_i18n_get_preferred_language';
 procedure gnome_i18n_init;cdecl;external libgnomedll name 'gnome_i18n_init';
 procedure gnome_i18n_init;cdecl;external libgnomedll name 'gnome_i18n_init';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}

+ 12 - 12
packages/gnome1/src/libgnome/gnomemetadata.inc

@@ -3,18 +3,18 @@ type
    TGnomeMetadataError = (GNOME_METADATA_OK := 0,GNOME_METADATA_IO_ERROR,
    TGnomeMetadataError = (GNOME_METADATA_OK := 0,GNOME_METADATA_IO_ERROR,
      GNOME_METADATA_NOT_FOUND);
      GNOME_METADATA_NOT_FOUND);
 
 
-function gnome_metadata_set(afile:Pchar; name:Pchar; size:longint; data:Pchar):longint;cdecl;external libgnomedll name 'gnome_metadata_set';
-function gnome_metadata_remove(afile:Pchar; name:Pchar):longint;cdecl;external libgnomedll name 'gnome_metadata_remove';
-function gnome_metadata_list(afile:Pchar):PPchar;cdecl;external libgnomedll name 'gnome_metadata_list';
-function gnome_metadata_get(afile:Pchar; name:Pchar; size:Plongint; buffer:PPchar):longint;cdecl;external libgnomedll name 'gnome_metadata_get';
-function gnome_metadata_get_fast(afile:Pchar; name:Pchar; size:Plongint; buffer:PPchar):longint;cdecl;external libgnomedll name 'gnome_metadata_get_fast';
-function gnome_metadata_rename(isfrom:Pchar; isto:Pchar):longint;cdecl;external libgnomedll name 'gnome_metadata_rename';
-function gnome_metadata_copy(isfrom:Pchar; isto:Pchar):longint;cdecl;external libgnomedll name 'gnome_metadata_copy';
-function gnome_metadata_delete(afile:Pchar):longint;cdecl;external libgnomedll name 'gnome_metadata_delete';
-procedure gnome_metadata_regex_add(regex:Pchar; key:Pchar; size:longint; data:Pchar);cdecl;external libgnomedll name 'gnome_metadata_regex_add';
-procedure gnome_metadata_regex_remove(regex:Pchar; key:Pchar);cdecl;external libgnomedll name 'gnome_metadata_regex_remove';
-procedure gnome_metadata_type_add(thetype:Pchar; key:Pchar; size:longint; data:Pchar);cdecl;external libgnomedll name 'gnome_metadata_type_add';
-procedure gnome_metadata_type_remove(thetype:Pchar; key:Pchar);cdecl;external libgnomedll name 'gnome_metadata_type_remove';
+function gnome_metadata_set(afile:PAnsiChar; name:PAnsiChar; size:longint; data:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_set';
+function gnome_metadata_remove(afile:PAnsiChar; name:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_remove';
+function gnome_metadata_list(afile:PAnsiChar):PPAnsiChar;cdecl;external libgnomedll name 'gnome_metadata_list';
+function gnome_metadata_get(afile:PAnsiChar; name:PAnsiChar; size:Plongint; buffer:PPAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_get';
+function gnome_metadata_get_fast(afile:PAnsiChar; name:PAnsiChar; size:Plongint; buffer:PPAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_get_fast';
+function gnome_metadata_rename(isfrom:PAnsiChar; isto:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_rename';
+function gnome_metadata_copy(isfrom:PAnsiChar; isto:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_copy';
+function gnome_metadata_delete(afile:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_metadata_delete';
+procedure gnome_metadata_regex_add(regex:PAnsiChar; key:PAnsiChar; size:longint; data:PAnsiChar);cdecl;external libgnomedll name 'gnome_metadata_regex_add';
+procedure gnome_metadata_regex_remove(regex:PAnsiChar; key:PAnsiChar);cdecl;external libgnomedll name 'gnome_metadata_regex_remove';
+procedure gnome_metadata_type_add(thetype:PAnsiChar; key:PAnsiChar; size:longint; data:PAnsiChar);cdecl;external libgnomedll name 'gnome_metadata_type_add';
+procedure gnome_metadata_type_remove(thetype:PAnsiChar; key:PAnsiChar);cdecl;external libgnomedll name 'gnome_metadata_type_remove';
 procedure gnome_metadata_lock;cdecl;external libgnomedll name 'gnome_metadata_lock';
 procedure gnome_metadata_lock;cdecl;external libgnomedll name 'gnome_metadata_lock';
 procedure gnome_metadata_unlock;cdecl;external libgnomedll name 'gnome_metadata_unlock';
 procedure gnome_metadata_unlock;cdecl;external libgnomedll name 'gnome_metadata_unlock';
 
 

+ 5 - 5
packages/gnome1/src/libgnome/gnomemime.inc

@@ -1,10 +1,10 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-function gnome_mime_type(filename:Pgchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_type';
-function gnome_mime_type_or_default(filename:Pgchar; defaultv:Pgchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_type_or_default';
-function gnome_mime_type_of_file(existing_filename:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_type_of_file';
-function gnome_mime_type_or_default_of_file(existing_filename:Pchar; defaultv:Pgchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_type_or_default_of_file';
-function gnome_mime_type_from_magic(filename:Pgchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_type_from_magic';
+function gnome_mime_type(filename:Pgchar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_type';
+function gnome_mime_type_or_default(filename:Pgchar; defaultv:Pgchar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_type_or_default';
+function gnome_mime_type_of_file(existing_filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_type_of_file';
+function gnome_mime_type_or_default_of_file(existing_filename:PAnsiChar; defaultv:Pgchar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_type_or_default_of_file';
+function gnome_mime_type_from_magic(filename:Pgchar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_type_from_magic';
 function gnome_uri_list_extract_filenames(uri_list:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_uri_list_extract_filenames';
 function gnome_uri_list_extract_filenames(uri_list:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_uri_list_extract_filenames';
 function gnome_uri_list_extract_uris(uri_list:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_uri_list_extract_uris';
 function gnome_uri_list_extract_uris(uri_list:Pgchar):PGList;cdecl;external libgnomedll name 'gnome_uri_list_extract_uris';
 procedure gnome_uri_list_free_strings(list:PGList);cdecl;external libgnomedll name 'gnome_uri_list_free_strings';
 procedure gnome_uri_list_free_strings(list:PGList);cdecl;external libgnomedll name 'gnome_uri_list_free_strings';

+ 8 - 8
packages/gnome1/src/libgnome/gnomemimeinfo.inc

@@ -1,13 +1,13 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-function gnome_mime_get_value(mime_type:Pchar; key:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_get_value';
-function gnome_mime_get_keys(mime_type:Pchar):PGList;cdecl;external libgnomedll name 'gnome_mime_get_keys';
-function gnome_mime_program(mime_type:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_program';
-function gnome_mime_description(mime_type:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_description';
-function gnome_mime_test(mime_type:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_test';
-function gnome_mime_composetyped(mime_type:Pchar):Pchar;cdecl;external libgnomedll name 'gnome_mime_composetyped';
-function gnome_mime_copiousoutput(mime_type:Pchar; key:Pchar):gboolean;cdecl;external libgnomedll name 'gnome_mime_copiousoutput';
-function gnome_mime_needsterminal(mime_type:Pchar; key:Pchar):gboolean;cdecl;external libgnomedll name 'gnome_mime_needsterminal';
+function gnome_mime_get_value(mime_type:PAnsiChar; key:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_get_value';
+function gnome_mime_get_keys(mime_type:PAnsiChar):PGList;cdecl;external libgnomedll name 'gnome_mime_get_keys';
+function gnome_mime_program(mime_type:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_program';
+function gnome_mime_description(mime_type:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_description';
+function gnome_mime_test(mime_type:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_test';
+function gnome_mime_composetyped(mime_type:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_mime_composetyped';
+function gnome_mime_copiousoutput(mime_type:PAnsiChar; key:PAnsiChar):gboolean;cdecl;external libgnomedll name 'gnome_mime_copiousoutput';
+function gnome_mime_needsterminal(mime_type:PAnsiChar; key:PAnsiChar):gboolean;cdecl;external libgnomedll name 'gnome_mime_needsterminal';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 2 - 2
packages/gnome1/src/libgnome/gnomeremote.inc

@@ -1,7 +1,7 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-procedure gnome_remote_get_command(host:Pchar; argcp:Pgint; argvp:PPPchar);cdecl;external libgnomedll name 'gnome_remote_get_command';
-procedure gnome_remote_set_command(host:Pchar; argc:gint; argv:PPchar);cdecl;external libgnomedll name 'gnome_remote_set_command';
+procedure gnome_remote_get_command(host:PAnsiChar; argcp:Pgint; argvp:PPPAnsiChar);cdecl;external libgnomedll name 'gnome_remote_get_command';
+procedure gnome_remote_set_command(host:PAnsiChar; argc:gint; argv:PPAnsiChar);cdecl;external libgnomedll name 'gnome_remote_set_command';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 3 - 3
packages/gnome1/src/libgnome/gnomesound.inc

@@ -3,10 +3,10 @@
 var
 var
    gnome_sound_connection : longint;cvar;external;
    gnome_sound_connection : longint;cvar;external;
 
 
-procedure gnome_sound_init(hostname:Pchar);cdecl;external libgnomedll name 'gnome_sound_init';
+procedure gnome_sound_init(hostname:PAnsiChar);cdecl;external libgnomedll name 'gnome_sound_init';
 procedure gnome_sound_shutdown;cdecl;external libgnomedll name 'gnome_sound_shutdown';
 procedure gnome_sound_shutdown;cdecl;external libgnomedll name 'gnome_sound_shutdown';
-function gnome_sound_sample_load(sample_name:Pchar; filename:Pchar):longint;cdecl;external libgnomedll name 'gnome_sound_sample_load';
-procedure gnome_sound_play(filename:Pchar);cdecl;external libgnomedll name 'gnome_sound_play';
+function gnome_sound_sample_load(sample_name:PAnsiChar; filename:PAnsiChar):longint;cdecl;external libgnomedll name 'gnome_sound_sample_load';
+procedure gnome_sound_play(filename:PAnsiChar);cdecl;external libgnomedll name 'gnome_sound_play';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 6 - 6
packages/gnome1/src/libgnome/gnometriggers.inc

@@ -4,7 +4,7 @@ type
   TGnomeTriggerType = (GTRIG_NONE,GTRIG_FUNCTION,GTRIG_COMMAND,
   TGnomeTriggerType = (GTRIG_NONE,GTRIG_FUNCTION,GTRIG_COMMAND,
      GTRIG_MEDIAPLAY);
      GTRIG_MEDIAPLAY);
 
 
-  TGnomeTriggerActionFunction = procedure (msg:Pchar; level:Pchar; supinfo:PPchar);cdecl;
+  TGnomeTriggerActionFunction = procedure (msg:PAnsiChar; level:PAnsiChar; supinfo:PPAnsiChar);cdecl;
 
 
   PGnomeTrigger = ^TGnomeTrigger;
   PGnomeTrigger = ^TGnomeTrigger;
   TGnomeTrigger = Record
   TGnomeTrigger = Record
@@ -22,13 +22,13 @@ type
   end;
   end;
 
 
 procedure gnome_triggers_init;cdecl;external libgnomedll name 'gnome_triggers_init';
 procedure gnome_triggers_init;cdecl;external libgnomedll name 'gnome_triggers_init';
-function gnome_triggers_readfile(infilename:Pchar):gint;cdecl;external libgnomedll name 'gnome_triggers_readfile';
+function gnome_triggers_readfile(infilename:PAnsiChar):gint;cdecl;external libgnomedll name 'gnome_triggers_readfile';
 procedure gnome_triggers_add_trigger(nt:PGnomeTrigger; args:array of const);cdecl;external libgnomedll name 'gnome_triggers_add_trigger';
 procedure gnome_triggers_add_trigger(nt:PGnomeTrigger; args:array of const);cdecl;external libgnomedll name 'gnome_triggers_add_trigger';
 procedure gnome_triggers_add_trigger(nt:PGnomeTrigger);cdecl;varargs;external libgnomedll name 'gnome_triggers_add_trigger';
 procedure gnome_triggers_add_trigger(nt:PGnomeTrigger);cdecl;varargs;external libgnomedll name 'gnome_triggers_add_trigger';
-procedure gnome_triggers_vadd_trigger(nt:PGnomeTrigger; supinfo:PPchar);cdecl;external libgnomedll name 'gnome_triggers_vadd_trigger';
-procedure gnome_triggers_do(msg:Pchar; level:Pchar; args:array of const);cdecl;external libgnomedll name 'gnome_triggers_do';
-procedure gnome_triggers_do(msg:Pchar; level:Pchar);cdecl;varargs;external libgnomedll name 'gnome_triggers_do';
-procedure gnome_triggers_vdo(msg:Pchar; level:Pchar; supinfo:PPchar);cdecl;external libgnomedll name 'gnome_triggers_vdo';
+procedure gnome_triggers_vadd_trigger(nt:PGnomeTrigger; supinfo:PPAnsiChar);cdecl;external libgnomedll name 'gnome_triggers_vadd_trigger';
+procedure gnome_triggers_do(msg:PAnsiChar; level:PAnsiChar; args:array of const);cdecl;external libgnomedll name 'gnome_triggers_do';
+procedure gnome_triggers_do(msg:PAnsiChar; level:PAnsiChar);cdecl;varargs;external libgnomedll name 'gnome_triggers_do';
+procedure gnome_triggers_vdo(msg:PAnsiChar; level:PAnsiChar; supinfo:PPAnsiChar);cdecl;external libgnomedll name 'gnome_triggers_vdo';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 1 - 1
packages/gnome1/src/libgnome/gnomeurl.inc

@@ -1,6 +1,6 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
-procedure gnome_url_show(url:Pchar);cdecl;external libgnomedll name 'gnome_url_show';
+procedure gnome_url_show(url:PAnsiChar);cdecl;external libgnomedll name 'gnome_url_show';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 18 - 18
packages/gnome1/src/libgnome/gnomeutil.inc

@@ -4,16 +4,16 @@ const
    PATH_SEP = '/';
    PATH_SEP = '/';
    PATH_SEP_STR = '/';
    PATH_SEP_STR = '/';
 
 
-function gnome_libdir_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_libdir_file';
-function gnome_datadir_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_datadir_file';
-function gnome_sound_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_sound_file';
-function gnome_pixmap_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_pixmap_file';
-function gnome_config_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_config_file';
-function gnome_unconditional_libdir_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_unconditional_libdir_file';
-function gnome_unconditional_datadir_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_unconditional_datadir_file';
-function gnome_unconditional_sound_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_unconditional_sound_file';
-function gnome_unconditional_pixmap_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_unconditional_pixmap_file';
-function gnome_unconditional_config_file(filename:Pchar):pchar;cdecl;external libgnomedll name 'gnome_unconditional_config_file';
+function gnome_libdir_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_libdir_file';
+function gnome_datadir_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_datadir_file';
+function gnome_sound_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_sound_file';
+function gnome_pixmap_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_pixmap_file';
+function gnome_config_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_config_file';
+function gnome_unconditional_libdir_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_unconditional_libdir_file';
+function gnome_unconditional_datadir_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_unconditional_datadir_file';
+function gnome_unconditional_sound_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_unconditional_sound_file';
+function gnome_unconditional_pixmap_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_unconditional_pixmap_file';
+function gnome_unconditional_config_file(filename:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'gnome_unconditional_config_file';
 
 
 const
 const
   G_FILE_TEST_EXISTS = ((1 shl 0) or (1 shl 1)) or (1 shl 2);
   G_FILE_TEST_EXISTS = ((1 shl 0) or (1 shl 1)) or (1 shl 2);
@@ -21,18 +21,18 @@ const
   G_FILE_TEST_ISLINK = 1 shl 1;
   G_FILE_TEST_ISLINK = 1 shl 1;
   G_FILE_TEST_ISDIR = 1 shl 2;
   G_FILE_TEST_ISDIR = 1 shl 2;
 
 
-function g_file_test(filename:Pchar; test:longint):longint;cdecl;external libgnomedll name 'g_file_test';
-function g_file_exists(filename:Pchar):longint;cdecl;external libgnomedll name 'g_file_exists';
+function g_file_test(filename:PAnsiChar; test:longint):longint;cdecl;external libgnomedll name 'g_file_test';
+function g_file_exists(filename:PAnsiChar):longint;cdecl;external libgnomedll name 'g_file_exists';
 function gnome_is_program_in_path(aprogram:Pgchar):Pgchar;cdecl;external libgnomedll name 'gnome_is_program_in_path';
 function gnome_is_program_in_path(aprogram:Pgchar):Pgchar;cdecl;external libgnomedll name 'gnome_is_program_in_path';
 
 
-function g_unix_error_string(error_num:longint):pchar;cdecl;external libgnomedll name 'g_unix_error_string';
-function g_concat_dir_and_file(dir:Pchar; afile:Pchar):pchar;cdecl;external libgnomedll name 'g_concat_dir_and_file';
+function g_unix_error_string(error_num:longint):PAnsiChar;cdecl;external libgnomedll name 'g_unix_error_string';
+function g_concat_dir_and_file(dir:PAnsiChar; afile:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'g_concat_dir_and_file';
 
 
-function g_extension_pointer(path:Pchar):pchar;cdecl;external libgnomedll name 'g_extension_pointer';
-function g_copy_vector(vec:PPchar):Ppchar;cdecl;external libgnomedll name 'g_copy_vector';
+function g_extension_pointer(path:PAnsiChar):PAnsiChar;cdecl;external libgnomedll name 'g_extension_pointer';
+function g_copy_vector(vec:PPAnsiChar):PPAnsiChar;cdecl;external libgnomedll name 'g_copy_vector';
 
 
-function gnome_util_user_shell:pchar;cdecl;external libgnomedll name 'gnome_util_user_shell';
-function g_is_image_filename(path:Pchar):gboolean;cdecl;external libgnomedll name 'g_is_image_filename';
+function gnome_util_user_shell:PAnsiChar;cdecl;external libgnomedll name 'gnome_util_user_shell';
+function g_is_image_filename(path:PAnsiChar):gboolean;cdecl;external libgnomedll name 'g_is_image_filename';
 
 
 //Function g_copy_strings(string1:Pgchar; args:array of const):Pgchar;
 //Function g_copy_strings(string1:Pgchar; args:array of const):Pgchar;
 Function g_filename_index(path : Pgchar) : Pgchar;
 Function g_filename_index(path : Pgchar) : Pgchar;

+ 9 - 9
packages/gnome1/src/libgnome/libgnome.pp

@@ -38,17 +38,17 @@ Type
     tm_wday : integer;
     tm_wday : integer;
     tm_yday : integer;
     tm_yday : integer;
     tm_isdst : integer;
     tm_isdst : integer;
-    tm_gmtoff : Pchar;
-    tm_zone : Pchar;
+    tm_gmtoff : PAnsiChar;
+    tm_zone : PAnsiChar;
   end;
   end;
 
 
 var
 var
-  gnome_user_home_dir : Pchar;cvar;external;
-  gnome_user_dir : Pchar;cvar;external;
-  gnome_user_private_dir : Pchar;cvar;external;
-  gnome_user_accels_dir : Pchar;cvar;external;
-  gnome_app_id : Pchar;cvar;external;
-  gnome_do_not_create_directories : char;cvar;external;
+  gnome_user_home_dir : PAnsiChar;cvar;external;
+  gnome_user_dir : PAnsiChar;cvar;external;
+  gnome_user_private_dir : PAnsiChar;cvar;external;
+  gnome_user_accels_dir : PAnsiChar;cvar;external;
+  gnome_app_id : PAnsiChar;cvar;external;
+  gnome_do_not_create_directories : AnsiChar;cvar;external;
 
 
 {$define read_interface}
 {$define read_interface}
 {$undef read_implementation}
 {$undef read_implementation}
@@ -70,7 +70,7 @@ var
 {$include gnometriggers.inc}
 {$include gnometriggers.inc}
 {$include gnomeurl.inc}
 {$include gnomeurl.inc}
 
 
-procedure gnomelib_init(app_id:Pchar; app_version:Pchar);cdecl;external;
+procedure gnomelib_init(app_id:PAnsiChar; app_version:PAnsiChar);cdecl;external;
 
 
 implementation
 implementation
 
 

+ 16 - 16
packages/gnome1/src/libgnomeui/gnomeapphelper.inc

@@ -50,8 +50,8 @@ type
      end;
      end;
 
 
 const
 const
-   GNOMEUIINFO_KEY_UIDATA :Pchar = 'uidata';
-   GNOMEUIINFO_KEY_UIBDATA :Pchar = 'uibdata';
+   GNOMEUIINFO_KEY_UIDATA :PAnsiChar = 'uidata';
+   GNOMEUIINFO_KEY_UIBDATA :PAnsiChar = 'uibdata';
 
 
 function GNOMEUIINFO_END : TGnomeUIInfo;
 function GNOMEUIINFO_END : TGnomeUIInfo;
 function GNOMEUIINFO_SEPARATOR : TGnomeUIInfo;
 function GNOMEUIINFO_SEPARATOR : TGnomeUIInfo;
@@ -115,20 +115,20 @@ function GNOMEUIINFO_MENU_GAME_TREE(tree : gpointer) : TGnomeUIInfo;
 
 
 
 
 const
 const
-   GNOME_MENU_FILE_STRING :Pchar = '_File';
-   GNOME_MENU_FILE_PATH :Pchar = '_File/';
-   GNOME_MENU_EDIT_STRING :Pchar = '_Edit';
-   GNOME_MENU_EDIT_PATH :Pchar = '_Edit/';
-   GNOME_MENU_VIEW_STRING :Pchar = '_View';
-   GNOME_MENU_VIEW_PATH :Pchar = '_View/';
-   GNOME_MENU_SETTINGS_STRING :Pchar = '_Settings';
-   GNOME_MENU_SETTINGS_PATH :Pchar = '_Settings/';
-   GNOME_MENU_NEW_STRING :Pchar = '_New';
-   GNOME_MENU_NEW_PATH :Pchar = '_New/';
-   GNOME_MENU_FILES_STRING :Pchar = 'Fi_les';
-   GNOME_MENU_FILES_PATH :Pchar = 'Fi_les/';
-   GNOME_MENU_WINDOWS_STRING :Pchar = '_Windows';
-   GNOME_MENU_WINDOWS_PATH :Pchar = '_Windows/';
+   GNOME_MENU_FILE_STRING :PAnsiChar = '_File';
+   GNOME_MENU_FILE_PATH :PAnsiChar = '_File/';
+   GNOME_MENU_EDIT_STRING :PAnsiChar = '_Edit';
+   GNOME_MENU_EDIT_PATH :PAnsiChar = '_Edit/';
+   GNOME_MENU_VIEW_STRING :PAnsiChar = '_View';
+   GNOME_MENU_VIEW_PATH :PAnsiChar = '_View/';
+   GNOME_MENU_SETTINGS_STRING :PAnsiChar = '_Settings';
+   GNOME_MENU_SETTINGS_PATH :PAnsiChar = '_Settings/';
+   GNOME_MENU_NEW_STRING :PAnsiChar = '_New';
+   GNOME_MENU_NEW_PATH :PAnsiChar = '_New/';
+   GNOME_MENU_FILES_STRING :PAnsiChar = 'Fi_les';
+   GNOME_MENU_FILES_PATH :PAnsiChar = 'Fi_les/';
+   GNOME_MENU_WINDOWS_STRING :PAnsiChar = '_Windows';
+   GNOME_MENU_WINDOWS_PATH :PAnsiChar = '_Windows/';
 type
 type
    PGnomeUIBuilderData = ^TGnomeUIBuilderData;
    PGnomeUIBuilderData = ^TGnomeUIBuilderData;
    TGnomeUISignalConnectFunc = procedure (uiinfo:PGnomeUIInfo; signal_name:Pgchar; uibdata:PGnomeUIBuilderData);cdecl;
    TGnomeUISignalConnectFunc = procedure (uiinfo:PGnomeUIInfo; signal_name:Pgchar; uibdata:PGnomeUIBuilderData);cdecl;

+ 1 - 1
packages/gnome1/src/libgnomeui/gnomecanvas.inc

@@ -234,7 +234,7 @@ procedure gnome_canvas_w2c_d(canvas:PGnomeCanvas; wx:double; wy:double; cx:Pdoub
 procedure gnome_canvas_c2w(canvas:PGnomeCanvas; cx:longint; cy:longint; wx:Pdouble; wy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_c2w';
 procedure gnome_canvas_c2w(canvas:PGnomeCanvas; cx:longint; cy:longint; wx:Pdouble; wy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_c2w';
 procedure gnome_canvas_window_to_world(canvas:PGnomeCanvas; winx:double; winy:double; worldx:Pdouble; worldy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_window_to_world';
 procedure gnome_canvas_window_to_world(canvas:PGnomeCanvas; winx:double; winy:double; worldx:Pdouble; worldy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_window_to_world';
 procedure gnome_canvas_world_to_window(canvas:PGnomeCanvas; worldx:double; worldy:double; winx:Pdouble; winy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_world_to_window';
 procedure gnome_canvas_world_to_window(canvas:PGnomeCanvas; worldx:double; worldy:double; winx:Pdouble; winy:Pdouble);cdecl;external libgnomeuidll name 'gnome_canvas_world_to_window';
-function gnome_canvas_get_color(canvas:PGnomeCanvas; spec:Pchar; color:PGdkColor):longint;cdecl;external libgnomeuidll name 'gnome_canvas_get_color';
+function gnome_canvas_get_color(canvas:PGnomeCanvas; spec:PAnsiChar; color:PGdkColor):longint;cdecl;external libgnomeuidll name 'gnome_canvas_get_color';
 function gnome_canvas_get_color_pixel(canvas:PGnomeCanvas; rgba:guint):gulong;cdecl;external libgnomeuidll name 'gnome_canvas_get_color_pixel';
 function gnome_canvas_get_color_pixel(canvas:PGnomeCanvas; rgba:guint):gulong;cdecl;external libgnomeuidll name 'gnome_canvas_get_color_pixel';
 procedure gnome_canvas_set_stipple_origin(canvas:PGnomeCanvas; gc:PGdkGC);cdecl;external libgnomeuidll name 'gnome_canvas_set_stipple_origin';
 procedure gnome_canvas_set_stipple_origin(canvas:PGnomeCanvas; gc:PGdkGC);cdecl;external libgnomeuidll name 'gnome_canvas_set_stipple_origin';
 procedure gnome_canvas_set_dither(canvas:PGnomeCanvas; dither:TGdkRgbDither);cdecl;external libgnomeuidll name 'gnome_canvas_set_dither';
 procedure gnome_canvas_set_dither(canvas:PGnomeCanvas; dither:TGdkRgbDither);cdecl;external libgnomeuidll name 'gnome_canvas_set_dither';

+ 1 - 1
packages/gnome1/src/libgnomeui/gnomecanvastext.inc

@@ -23,7 +23,7 @@ type
    PGnomeCanvasText = ^TGnomeCanvasText;
    PGnomeCanvasText = ^TGnomeCanvasText;
    TGnomeCanvasText = record
    TGnomeCanvasText = record
         item : TGnomeCanvasItem;
         item : TGnomeCanvasItem;
-        thetext : Pchar;
+        thetext : PAnsiChar;
         lines : gpointer;
         lines : gpointer;
         num_lines : longint;
         num_lines : longint;
         x : double;
         x : double;

+ 2 - 2
packages/gnome1/src/libgnomeui/gnomedock.inc

@@ -178,7 +178,7 @@ function gnome_dock_item_get_type:TGTKType;cdecl;external libgnomeuidll name 'gn
 function gnome_dock_item_new(name:Pgchar; behavior:TGnomeDockItemBehavior):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_dock_item_new';
 function gnome_dock_item_new(name:Pgchar; behavior:TGnomeDockItemBehavior):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_dock_item_new';
 procedure gnome_dock_item_construct(new_dock_item:PGnomeDockItem; name:Pgchar; behavior:TGnomeDockItemBehavior);cdecl;external libgnomeuidll name 'gnome_dock_item_construct';
 procedure gnome_dock_item_construct(new_dock_item:PGnomeDockItem; name:Pgchar; behavior:TGnomeDockItemBehavior);cdecl;external libgnomeuidll name 'gnome_dock_item_construct';
 function gnome_dock_item_get_child(dock_item:PGnomeDockItem):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_dock_item_get_child';
 function gnome_dock_item_get_child(dock_item:PGnomeDockItem):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_dock_item_get_child';
-function gnome_dock_item_get_name(dock_item:PGnomeDockItem):Pchar;cdecl;external libgnomeuidll name 'gnome_dock_item_get_name';
+function gnome_dock_item_get_name(dock_item:PGnomeDockItem):PAnsiChar;cdecl;external libgnomeuidll name 'gnome_dock_item_get_name';
 procedure gnome_dock_item_set_shadow_type(dock_item:PGnomeDockItem; thetype:TGtkShadowType);cdecl;external libgnomeuidll name 'gnome_dock_item_set_shadow_type';
 procedure gnome_dock_item_set_shadow_type(dock_item:PGnomeDockItem; thetype:TGtkShadowType);cdecl;external libgnomeuidll name 'gnome_dock_item_set_shadow_type';
 function gnome_dock_item_get_shadow_type(dock_item:PGnomeDockItem):TGtkShadowType;cdecl;external libgnomeuidll name 'gnome_dock_item_get_shadow_type';
 function gnome_dock_item_get_shadow_type(dock_item:PGnomeDockItem):TGtkShadowType;cdecl;external libgnomeuidll name 'gnome_dock_item_get_shadow_type';
 function gnome_dock_item_set_orientation(dock_item:PGnomeDockItem; orientation:TGtkOrientation):gboolean;cdecl;external libgnomeuidll name 'gnome_dock_item_set_orientation';
 function gnome_dock_item_set_orientation(dock_item:PGnomeDockItem; orientation:TGtkOrientation):gboolean;cdecl;external libgnomeuidll name 'gnome_dock_item_set_orientation';
@@ -226,7 +226,7 @@ function gnome_dock_band_get_num_children(band:PGnomeDockBand):guint;cdecl;exter
 procedure gnome_dock_band_drag_begin(band:PGnomeDockBand; item:PGnomeDockItem);cdecl;external libgnomeuidll name 'gnome_dock_band_drag_begin';
 procedure gnome_dock_band_drag_begin(band:PGnomeDockBand; item:PGnomeDockItem);cdecl;external libgnomeuidll name 'gnome_dock_band_drag_begin';
 function gnome_dock_band_drag_to(band:PGnomeDockBand; item:PGnomeDockItem; x:gint; y:gint):gboolean;cdecl;external libgnomeuidll name 'gnome_dock_band_drag_to';
 function gnome_dock_band_drag_to(band:PGnomeDockBand; item:PGnomeDockItem; x:gint; y:gint):gboolean;cdecl;external libgnomeuidll name 'gnome_dock_band_drag_to';
 procedure gnome_dock_band_drag_end(band:PGnomeDockBand; item:PGnomeDockItem);cdecl;external libgnomeuidll name 'gnome_dock_band_drag_end';
 procedure gnome_dock_band_drag_end(band:PGnomeDockBand; item:PGnomeDockItem);cdecl;external libgnomeuidll name 'gnome_dock_band_drag_end';
-function gnome_dock_band_get_item_by_name(band:PGnomeDockBand; name:Pchar; position_return:Pguint; offset_return:Pguint):PGnomeDockItem;cdecl;external libgnomeuidll name 'gnome_dock_band_get_item_by_name';
+function gnome_dock_band_get_item_by_name(band:PGnomeDockBand; name:PAnsiChar; position_return:Pguint; offset_return:Pguint):PGnomeDockItem;cdecl;external libgnomeuidll name 'gnome_dock_band_get_item_by_name';
 procedure gnome_dock_band_layout_add(band:PGnomeDockBand; layout:PGnomeDockLayout; placement:TGnomeDockPlacement; band_num:guint);cdecl;external libgnomeuidll name 'gnome_dock_band_layout_add';
 procedure gnome_dock_band_layout_add(band:PGnomeDockBand; layout:PGnomeDockLayout; placement:TGnomeDockPlacement; band_num:guint);cdecl;external libgnomeuidll name 'gnome_dock_band_layout_add';
 
 
 function GNOME_TYPE_DOCK : TGTKType;
 function GNOME_TYPE_DOCK : TGTKType;

+ 7 - 7
packages/gnome1/src/libgnomeui/gnomefileentry.inc

@@ -3,8 +3,8 @@ type
    PGnomeFileEntry = ^TGnomeFileEntry;
    PGnomeFileEntry = ^TGnomeFileEntry;
    TGnomeFileEntry = record
    TGnomeFileEntry = record
         hbox : TGtkHBox;
         hbox : TGtkHBox;
-        browse_dialog_title : Pchar;
-        default_path : Pchar;
+        browse_dialog_title : PAnsiChar;
+        default_path : PAnsiChar;
         fsw : PGtkWidget;
         fsw : PGtkWidget;
         is_modal : gboolean;
         is_modal : gboolean;
         directory_entry : gboolean;
         directory_entry : gboolean;
@@ -25,14 +25,14 @@ function GNOME_IS_FILE_ENTRY(obj : Pointer) : Boolean;
 function GNOME_IS_FILE_ENTRY_CLASS(klass : Pointer) : Boolean;
 function GNOME_IS_FILE_ENTRY_CLASS(klass : Pointer) : Boolean;
 
 
 function gnome_file_entry_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_file_entry_get_type';
 function gnome_file_entry_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_file_entry_get_type';
-function gnome_file_entry_new(history_id:Pchar; browse_dialog_title:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_new';
-procedure gnome_file_entry_construct(fentry:PGnomeFileEntry; history_id:Pchar; browse_dialog_title:Pchar);cdecl;external libgnomeuidll name 'gnome_file_entry_construct';
+function gnome_file_entry_new(history_id:PAnsiChar; browse_dialog_title:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_new';
+procedure gnome_file_entry_construct(fentry:PGnomeFileEntry; history_id:PAnsiChar; browse_dialog_title:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_file_entry_construct';
 function gnome_file_entry_gnome_entry(fentry:PGnomeFileEntry):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_gnome_entry';
 function gnome_file_entry_gnome_entry(fentry:PGnomeFileEntry):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_gnome_entry';
 function gnome_file_entry_gtk_entry(fentry:PGnomeFileEntry):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_gtk_entry';
 function gnome_file_entry_gtk_entry(fentry:PGnomeFileEntry):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_file_entry_gtk_entry';
-procedure gnome_file_entry_set_title(fentry:PGnomeFileEntry; browse_dialog_title:Pchar);cdecl;external libgnomeuidll name 'gnome_file_entry_set_title';
-procedure gnome_file_entry_set_default_path(fentry:PGnomeFileEntry; path:Pchar);cdecl;external libgnomeuidll name 'gnome_file_entry_set_default_path';
+procedure gnome_file_entry_set_title(fentry:PGnomeFileEntry; browse_dialog_title:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_file_entry_set_title';
+procedure gnome_file_entry_set_default_path(fentry:PGnomeFileEntry; path:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_file_entry_set_default_path';
 procedure gnome_file_entry_set_directory(fentry:PGnomeFileEntry; directory_entry:gboolean);cdecl;external libgnomeuidll name 'gnome_file_entry_set_directory';
 procedure gnome_file_entry_set_directory(fentry:PGnomeFileEntry; directory_entry:gboolean);cdecl;external libgnomeuidll name 'gnome_file_entry_set_directory';
-function gnome_file_entry_get_full_path(fentry:PGnomeFileEntry; file_must_exist:gboolean):Pchar;cdecl;external libgnomeuidll name 'gnome_file_entry_get_full_path';
+function gnome_file_entry_get_full_path(fentry:PGnomeFileEntry; file_must_exist:gboolean):PAnsiChar;cdecl;external libgnomeuidll name 'gnome_file_entry_get_full_path';
 procedure gnome_file_entry_set_modal(fentry:PGnomeFileEntry; is_modal:gboolean);cdecl;external libgnomeuidll name 'gnome_file_entry_set_modal';
 procedure gnome_file_entry_set_modal(fentry:PGnomeFileEntry; is_modal:gboolean);cdecl;external libgnomeuidll name 'gnome_file_entry_set_modal';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}

+ 5 - 5
packages/gnome1/src/libgnomeui/gnomeiconitem.inc

@@ -7,11 +7,11 @@ type
         x : longint;
         x : longint;
         y : longint;
         y : longint;
         width : longint;
         width : longint;
-        fontname : pchar;
+        fontname : PAnsiChar;
         priv : gpointer;
         priv : gpointer;
         pad1 : gpointer;
         pad1 : gpointer;
         pad2 : gpointer;
         pad2 : gpointer;
-        thetext : pchar;
+        thetext : PAnsiChar;
         ti : PGnomeIconTextInfo;
         ti : PGnomeIconTextInfo;
         flag0 : word;
         flag0 : word;
         pad3 : dword;
         pad3 : dword;
@@ -61,11 +61,11 @@ function GNOME_IS_ICON_TEXT_ITEM(obj : Pointer) : Boolean;
 function GNOME_IS_ICON_TEXT_ITEM_CLASS(klass : Pointer) : Boolean;
 function GNOME_IS_ICON_TEXT_ITEM_CLASS(klass : Pointer) : Boolean;
 
 
 function gnome_icon_text_item_get_type:TGtkType;cdecl;external libgnomeuidll name 'gnome_icon_text_item_get_type';
 function gnome_icon_text_item_get_type:TGtkType;cdecl;external libgnomeuidll name 'gnome_icon_text_item_get_type';
-procedure gnome_icon_text_item_configure(iti:PGnomeIconTextItem; x:longint; y:longint; width:longint; fontname:Pchar;
-            thetext:Pchar; is_editable:gboolean; is_static:gboolean);cdecl;external libgnomeuidll name 'gnome_icon_text_item_configure';
+procedure gnome_icon_text_item_configure(iti:PGnomeIconTextItem; x:longint; y:longint; width:longint; fontname:PAnsiChar;
+            thetext:PAnsiChar; is_editable:gboolean; is_static:gboolean);cdecl;external libgnomeuidll name 'gnome_icon_text_item_configure';
 procedure gnome_icon_text_item_setxy(iti:PGnomeIconTextItem; x:longint; y:longint);cdecl;external libgnomeuidll name 'gnome_icon_text_item_setxy';
 procedure gnome_icon_text_item_setxy(iti:PGnomeIconTextItem; x:longint; y:longint);cdecl;external libgnomeuidll name 'gnome_icon_text_item_setxy';
 procedure gnome_icon_text_item_select(iti:PGnomeIconTextItem; sel:longint);cdecl;external libgnomeuidll name 'gnome_icon_text_item_select';
 procedure gnome_icon_text_item_select(iti:PGnomeIconTextItem; sel:longint);cdecl;external libgnomeuidll name 'gnome_icon_text_item_select';
-function gnome_icon_text_item_get_text(iti:PGnomeIconTextItem):Pchar;cdecl;external libgnomeuidll name 'gnome_icon_text_item_get_text';
+function gnome_icon_text_item_get_text(iti:PGnomeIconTextItem):PAnsiChar;cdecl;external libgnomeuidll name 'gnome_icon_text_item_get_text';
 procedure gnome_icon_text_item_start_editing(iti:PGnomeIconTextItem);cdecl;external libgnomeuidll name 'gnome_icon_text_item_start_editing';
 procedure gnome_icon_text_item_start_editing(iti:PGnomeIconTextItem);cdecl;external libgnomeuidll name 'gnome_icon_text_item_start_editing';
 procedure gnome_icon_text_item_stop_editing(iti:PGnomeIconTextItem; accept:gboolean);cdecl;external libgnomeuidll name 'gnome_icon_text_item_stop_editing';
 procedure gnome_icon_text_item_stop_editing(iti:PGnomeIconTextItem; accept:gboolean);cdecl;external libgnomeuidll name 'gnome_icon_text_item_stop_editing';
 
 

+ 6 - 6
packages/gnome1/src/libgnomeui/gnomeiconlist.inc

@@ -53,7 +53,7 @@ type
         parent_class : TGnomeCanvasClass;
         parent_class : TGnomeCanvasClass;
         select_icon : procedure (gil:PGnomeIconList; num:gint; event:PGdkEvent);cdecl;
         select_icon : procedure (gil:PGnomeIconList; num:gint; event:PGdkEvent);cdecl;
         unselect_icon : procedure (gil:PGnomeIconList; num:gint; event:PGdkEvent);cdecl;
         unselect_icon : procedure (gil:PGnomeIconList; num:gint; event:PGdkEvent);cdecl;
-        text_changed : function (gil:PGnomeIconList; num:gint; new_text:Pchar):gboolean;cdecl;
+        text_changed : function (gil:PGnomeIconList; num:gint; new_text:PAnsiChar):gboolean;cdecl;
      end;
      end;
 
 
 const
 const
@@ -72,10 +72,10 @@ procedure gnome_icon_list_set_hadjustment(gil:PGnomeIconList; hadj:PGtkAdjustmen
 procedure gnome_icon_list_set_vadjustment(gil:PGnomeIconList; vadj:PGtkAdjustment);cdecl;external libgnomeuidll name 'gnome_icon_list_set_vadjustment';
 procedure gnome_icon_list_set_vadjustment(gil:PGnomeIconList; vadj:PGtkAdjustment);cdecl;external libgnomeuidll name 'gnome_icon_list_set_vadjustment';
 procedure gnome_icon_list_freeze(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_freeze';
 procedure gnome_icon_list_freeze(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_freeze';
 procedure gnome_icon_list_thaw(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_thaw';
 procedure gnome_icon_list_thaw(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_thaw';
-procedure gnome_icon_list_insert(gil:PGnomeIconList; pos:longint; icon_filename:Pchar; thetext:Pchar);cdecl;external libgnomeuidll name 'gnome_icon_list_insert';
-procedure gnome_icon_list_insert_imlib(gil:PGnomeIconList; pos:longint; image:PGdkImlibImage; thetext:Pchar);cdecl;external libgnomeuidll name 'gnome_icon_list_insert_imlib';
-function gnome_icon_list_append(gil:PGnomeIconList; icon_filename:Pchar; thetext:Pchar):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_append';
-function gnome_icon_list_append_imlib(gil:PGnomeIconList; image:PGdkImlibImage; thetext:Pchar):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_append_imlib';
+procedure gnome_icon_list_insert(gil:PGnomeIconList; pos:longint; icon_filename:PAnsiChar; thetext:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_icon_list_insert';
+procedure gnome_icon_list_insert_imlib(gil:PGnomeIconList; pos:longint; image:PGdkImlibImage; thetext:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_icon_list_insert_imlib';
+function gnome_icon_list_append(gil:PGnomeIconList; icon_filename:PAnsiChar; thetext:PAnsiChar):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_append';
+function gnome_icon_list_append_imlib(gil:PGnomeIconList; image:PGdkImlibImage; thetext:PAnsiChar):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_append_imlib';
 procedure gnome_icon_list_clear(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_clear';
 procedure gnome_icon_list_clear(gil:PGnomeIconList);cdecl;external libgnomeuidll name 'gnome_icon_list_clear';
 procedure gnome_icon_list_remove(gil:PGnomeIconList; pos:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_remove';
 procedure gnome_icon_list_remove(gil:PGnomeIconList; pos:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_remove';
 procedure gnome_icon_list_set_selection_mode(gil:PGnomeIconList; mode:TGtkSelectionMode);cdecl;external libgnomeuidll name 'gnome_icon_list_set_selection_mode';
 procedure gnome_icon_list_set_selection_mode(gil:PGnomeIconList; mode:TGtkSelectionMode);cdecl;external libgnomeuidll name 'gnome_icon_list_set_selection_mode';
@@ -87,7 +87,7 @@ procedure gnome_icon_list_set_row_spacing(gil:PGnomeIconList; pixels:longint);cd
 procedure gnome_icon_list_set_col_spacing(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_col_spacing';
 procedure gnome_icon_list_set_col_spacing(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_col_spacing';
 procedure gnome_icon_list_set_text_spacing(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_text_spacing';
 procedure gnome_icon_list_set_text_spacing(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_text_spacing';
 procedure gnome_icon_list_set_icon_border(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_border';
 procedure gnome_icon_list_set_icon_border(gil:PGnomeIconList; pixels:longint);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_border';
-procedure gnome_icon_list_set_separators(gil:PGnomeIconList; sep:Pchar);cdecl;external libgnomeuidll name 'gnome_icon_list_set_separators';
+procedure gnome_icon_list_set_separators(gil:PGnomeIconList; sep:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_icon_list_set_separators';
 procedure gnome_icon_list_set_icon_data(gil:PGnomeIconList; pos:longint; data:gpointer);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_data';
 procedure gnome_icon_list_set_icon_data(gil:PGnomeIconList; pos:longint; data:gpointer);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_data';
 procedure gnome_icon_list_set_icon_data_full(gil:PGnomeIconList; pos:longint; data:gpointer; destroy:TGtkDestroyNotify);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_data_full';
 procedure gnome_icon_list_set_icon_data_full(gil:PGnomeIconList; pos:longint; data:gpointer; destroy:TGtkDestroyNotify);cdecl;external libgnomeuidll name 'gnome_icon_list_set_icon_data_full';
 function gnome_icon_list_find_icon_from_data(gil:PGnomeIconList; data:gpointer):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_find_icon_from_data';
 function gnome_icon_list_find_icon_from_data(gil:PGnomeIconList; data:gpointer):longint;cdecl;external libgnomeuidll name 'gnome_icon_list_find_icon_from_data';

+ 2 - 2
packages/gnome1/src/libgnomeui/gnomeinit.inc

@@ -1,9 +1,9 @@
 {$IfDef read_interface}
 {$IfDef read_interface}
 
 
 
 
-function gnome_init(app_id:Pchar; app_version:Pchar; argc:longint; argv:PPchar):longint;cdecl;external libgnomeuidll name 'gnome_init';
+function gnome_init(app_id:PAnsiChar; app_version:PAnsiChar; argc:longint; argv:PPAnsiChar):longint;cdecl;external libgnomeuidll name 'gnome_init';
 
 
-(* function gnome_init_with_popt_table(app_id:Pchar; app_version:Pchar; argc:longint; argv:PPchar; options:PpoptOption;
+(* function gnome_init_with_popt_table(app_id:PAnsiChar; app_version:PAnsiChar; argc:longint; argv:PPAnsiChar; options:PpoptOption;
            flags:longint; return_ctx:PpoptContext):longint;cdecl;external libgnomeuidll name 'gnome_init_with_popt_table';*)
            flags:longint; return_ctx:PpoptContext):longint;cdecl;external libgnomeuidll name 'gnome_init_with_popt_table';*)
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}

+ 8 - 8
packages/gnome1/src/libgnomeui/gnomepixmap.inc

@@ -20,10 +20,10 @@ function GNOME_IS_PIXMAP(obj : pointer) : gboolean;
 function GNOME_IS_PIXMAP_CLASS(klass : pointer) : gboolean;
 function GNOME_IS_PIXMAP_CLASS(klass : pointer) : gboolean;
 
 
 function gnome_pixmap_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_pixmap_get_type';
 function gnome_pixmap_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_pixmap_get_type';
-function gnome_pixmap_new_from_file(filename:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_file';
-function gnome_pixmap_new_from_file_at_size(filename:Pchar; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_file_at_size';
-function gnome_pixmap_new_from_xpm_d(xpm_data:PPchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_xpm_d';
-function gnome_pixmap_new_from_xpm_d_at_size(xpm_data:PPchar; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_xpm_d_at_size';
+function gnome_pixmap_new_from_file(filename:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_file';
+function gnome_pixmap_new_from_file_at_size(filename:PAnsiChar; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_file_at_size';
+function gnome_pixmap_new_from_xpm_d(xpm_data:PPAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_xpm_d';
+function gnome_pixmap_new_from_xpm_d_at_size(xpm_data:PPAnsiChar; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_xpm_d_at_size';
 function gnome_pixmap_new_from_rgb_d(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_rgb_d';
 function gnome_pixmap_new_from_rgb_d(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_rgb_d';
 function gnome_pixmap_new_from_rgb_d_shaped(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint; shape_color:PGdkImlibColor):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_rgb_d_shaped';
 function gnome_pixmap_new_from_rgb_d_shaped(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint; shape_color:PGdkImlibColor):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_rgb_d_shaped';
 function gnome_pixmap_new_from_rgb_d_shaped_at_size(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint; width:longint;
 function gnome_pixmap_new_from_rgb_d_shaped_at_size(data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint; width:longint;
@@ -33,10 +33,10 @@ function gnome_pixmap_new_from_rgb_d_at_size(data:Pbyte; alpha:Pbyte; rgb_width:
 function gnome_pixmap_new_from_gnome_pixmap(gpixmap:PGnomePixmap):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_gnome_pixmap';
 function gnome_pixmap_new_from_gnome_pixmap(gpixmap:PGnomePixmap):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_gnome_pixmap';
 function gnome_pixmap_new_from_imlib(image:PGdkImlibImage):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_imlib';
 function gnome_pixmap_new_from_imlib(image:PGdkImlibImage):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_imlib';
 function gnome_pixmap_new_from_imlib_at_size(image:PGdkImlibImage; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_imlib_at_size';
 function gnome_pixmap_new_from_imlib_at_size(image:PGdkImlibImage; width:longint; height:longint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_new_from_imlib_at_size';
-procedure gnome_pixmap_load_file(gpixmap:PGnomePixmap; filename:Pchar);cdecl;external libgnomeuidll name 'gnome_pixmap_load_file';
-procedure gnome_pixmap_load_file_at_size(gpixmap:PGnomePixmap; filename:Pchar; width:longint; height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_file_at_size';
-procedure gnome_pixmap_load_xpm_d(gpixmap:PGnomePixmap; xpm_data:PPchar);cdecl;external libgnomeuidll name 'gnome_pixmap_load_xpm_d';
-procedure gnome_pixmap_load_xpm_d_at_size(gpixmap:PGnomePixmap; xpm_data:PPchar; width:longint; height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_xpm_d_at_size';
+procedure gnome_pixmap_load_file(gpixmap:PGnomePixmap; filename:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_pixmap_load_file';
+procedure gnome_pixmap_load_file_at_size(gpixmap:PGnomePixmap; filename:PAnsiChar; width:longint; height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_file_at_size';
+procedure gnome_pixmap_load_xpm_d(gpixmap:PGnomePixmap; xpm_data:PPAnsiChar);cdecl;external libgnomeuidll name 'gnome_pixmap_load_xpm_d';
+procedure gnome_pixmap_load_xpm_d_at_size(gpixmap:PGnomePixmap; xpm_data:PPAnsiChar; width:longint; height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_xpm_d_at_size';
 procedure gnome_pixmap_load_rgb_d(gpixmap:PGnomePixmap; data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_rgb_d';
 procedure gnome_pixmap_load_rgb_d(gpixmap:PGnomePixmap; data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint);cdecl;external libgnomeuidll name 'gnome_pixmap_load_rgb_d';
 procedure gnome_pixmap_load_rgb_d_shaped(gpixmap:PGnomePixmap; data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint;
 procedure gnome_pixmap_load_rgb_d_shaped(gpixmap:PGnomePixmap; data:Pbyte; alpha:Pbyte; rgb_width:longint; rgb_height:longint;
             shape_color:PGdkImlibColor);cdecl;external libgnomeuidll name 'gnome_pixmap_load_rgb_d_shaped';
             shape_color:PGdkImlibColor);cdecl;external libgnomeuidll name 'gnome_pixmap_load_rgb_d_shaped';

+ 27 - 27
packages/gnome1/src/libgnomeui/gnomestock.inc

@@ -96,7 +96,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         xpm_data : PPgchar;
         xpm_data : PPgchar;
      end;
      end;
 
 
@@ -105,7 +105,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         rgb_data : Pgchar;
         rgb_data : Pgchar;
         shape : TGdkImlibColor;
         shape : TGdkImlibColor;
      end;
      end;
@@ -115,7 +115,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         rgb_data : Pgchar;
         rgb_data : Pgchar;
         shape : TGdkImlibColor;
         shape : TGdkImlibColor;
         scaled_width : longint;
         scaled_width : longint;
@@ -127,7 +127,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         filename : Pgchar;
         filename : Pgchar;
      end;
      end;
 
 
@@ -136,7 +136,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         pathname : Pgchar;
         pathname : Pgchar;
      end;
      end;
 
 
@@ -145,7 +145,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         widget : PGtkWidget;
         widget : PGtkWidget;
      end;
      end;
 
 
@@ -154,7 +154,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
         pixmap : PGnomePixmap;
         pixmap : PGnomePixmap;
      end;
      end;
 
 
@@ -163,7 +163,7 @@ type
         thetype : TGnomeStockPixmapType;
         thetype : TGnomeStockPixmapType;
         width : longint;
         width : longint;
         height : longint;
         height : longint;
-        thelabel : Pchar;
+        thelabel : PAnsiChar;
      end;
      end;
 
 
    PGnomeStockPixmapEntry = ^TGnomeStockPixmapEntry;
    PGnomeStockPixmapEntry = ^TGnomeStockPixmapEntry;
@@ -187,7 +187,7 @@ type
         disabled : PGnomePixmap;
         disabled : PGnomePixmap;
         focused : PGnomePixmap;
         focused : PGnomePixmap;
         current : PGnomePixmap;
         current : PGnomePixmap;
-        icon : Pchar;
+        icon : PAnsiChar;
         c_regular : guint32;
         c_regular : guint32;
         c_disabled : guint32;
         c_disabled : guint32;
         c_focused : guint32;
         c_focused : guint32;
@@ -206,19 +206,19 @@ function GNOME_IS_STOCK(obj : pointer) : gboolean;
 function GNOME_IS_STOCK_CLASS(klass : pointer) : gboolean;
 function GNOME_IS_STOCK_CLASS(klass : pointer) : gboolean;
 function GNOME_IS_STOCK_PIXMAP_WIDGET(obj : pointer) : gboolean;
 function GNOME_IS_STOCK_PIXMAP_WIDGET(obj : pointer) : gboolean;
 
 
-function gnome_stock_pixmap_widget_new(window:PGtkWidget; icon:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_new';
+function gnome_stock_pixmap_widget_new(window:PGtkWidget; icon:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_new';
 function gnome_stock_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_stock_get_type';
 function gnome_stock_get_type:TGTKType;cdecl;external libgnomeuidll name 'gnome_stock_get_type';
 function gnome_stock_new:PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_new';
 function gnome_stock_new:PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_new';
-function gnome_stock_new_with_icon(icon:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_new_with_icon';
-function gnome_stock_set_icon(stock:PGnomeStock; icon:Pchar):gboolean;cdecl;external libgnomeuidll name 'gnome_stock_set_icon';
-function gnome_stock_pixmap(window:PGtkWidget; icon:Pchar; subtype:Pchar):PGnomePixmap;cdecl;external libgnomeuidll name 'gnome_stock_pixmap';
-function gnome_stock_pixmap_widget(window:PGtkWidget; icon:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget';
-function gnome_stock_pixmap_widget_at_size(window:PGtkWidget; icon:Pchar; width:guint; height:guint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_at_size';
-procedure gnome_stock_pixmap_widget_set_icon(widget:PGnomeStock; icon:Pchar);cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_set_icon';
-function gnome_stock_pixmap_register(icon:Pchar; subtype:Pchar; entry:PGnomeStockPixmapEntry):gint;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_register';
-function gnome_stock_pixmap_change(icon:Pchar; subtype:Pchar; entry:PGnomeStockPixmapEntry):gint;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_change';
-function gnome_stock_pixmap_checkfor(icon:Pchar; subtype:Pchar):PGnomeStockPixmapEntry;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_checkfor';
-function gnome_pixmap_button(pixmap:PGtkWidget; thetext:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_button';
+function gnome_stock_new_with_icon(icon:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_new_with_icon';
+function gnome_stock_set_icon(stock:PGnomeStock; icon:PAnsiChar):gboolean;cdecl;external libgnomeuidll name 'gnome_stock_set_icon';
+function gnome_stock_pixmap(window:PGtkWidget; icon:PAnsiChar; subtype:PAnsiChar):PGnomePixmap;cdecl;external libgnomeuidll name 'gnome_stock_pixmap';
+function gnome_stock_pixmap_widget(window:PGtkWidget; icon:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget';
+function gnome_stock_pixmap_widget_at_size(window:PGtkWidget; icon:PAnsiChar; width:guint; height:guint):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_at_size';
+procedure gnome_stock_pixmap_widget_set_icon(widget:PGnomeStock; icon:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_stock_pixmap_widget_set_icon';
+function gnome_stock_pixmap_register(icon:PAnsiChar; subtype:PAnsiChar; entry:PGnomeStockPixmapEntry):gint;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_register';
+function gnome_stock_pixmap_change(icon:PAnsiChar; subtype:PAnsiChar; entry:PGnomeStockPixmapEntry):gint;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_change';
+function gnome_stock_pixmap_checkfor(icon:PAnsiChar; subtype:PAnsiChar):PGnomeStockPixmapEntry;cdecl;external libgnomeuidll name 'gnome_stock_pixmap_checkfor';
+function gnome_pixmap_button(pixmap:PGtkWidget; thetext:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_pixmap_button';
 procedure gnome_button_can_default(button:PGtkButton; can_default:gboolean);cdecl;external libgnomeuidll name 'gnome_button_can_default';
 procedure gnome_button_can_default(button:PGtkButton; can_default:gboolean);cdecl;external libgnomeuidll name 'gnome_button_can_default';
 
 
 const
 const
@@ -235,8 +235,8 @@ const
    GNOME_STOCK_BUTTON_DOWN = 'Button_Down';
    GNOME_STOCK_BUTTON_DOWN = 'Button_Down';
    GNOME_STOCK_BUTTON_FONT = 'Button_Font';
    GNOME_STOCK_BUTTON_FONT = 'Button_Font';
 
 
-function gnome_stock_button(thetype:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_button';
-function gnome_stock_or_ordinary_button(thetype:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_or_ordinary_button';
+function gnome_stock_button(thetype:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_button';
+function gnome_stock_or_ordinary_button(thetype:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_or_ordinary_button';
 
 
 const
 const
    GNOME_STOCK_MENU_BLANK = 'Menu_';
    GNOME_STOCK_MENU_BLANK = 'Menu_';
@@ -308,11 +308,11 @@ const
    GNOME_STOCK_MENU_TEXT_STRIKEOUT = 'Menu_Strikeout';
    GNOME_STOCK_MENU_TEXT_STRIKEOUT = 'Menu_Strikeout';
    GNOME_STOCK_MENU_EXIT = GNOME_STOCK_MENU_QUIT;
    GNOME_STOCK_MENU_EXIT = GNOME_STOCK_MENU_QUIT;
 
 
-function gnome_stock_menu_item(thetype:Pchar; thetext:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_menu_item';
-function gnome_stock_menu_accel(thetype:Pchar; key:Pguchar; mods:Pguint8):gboolean;cdecl;external libgnomeuidll name 'gnome_stock_menu_accel';
-procedure gnome_stock_menu_accel_parse(section:Pchar);cdecl;external libgnomeuidll name 'gnome_stock_menu_accel_parse';
-function gnome_stock_transparent_window(icon:Pchar; subtype:Pchar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_transparent_window';
-procedure gnome_stock_pixmap_gdk(icon:Pchar; subtype:Pchar; pixmap:PPGdkPixmap; mask:PPGdkPixmap);cdecl;external libgnomeuidll name 'gnome_stock_pixmap_gdk';
+function gnome_stock_menu_item(thetype:PAnsiChar; thetext:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_menu_item';
+function gnome_stock_menu_accel(thetype:PAnsiChar; key:Pguchar; mods:Pguint8):gboolean;cdecl;external libgnomeuidll name 'gnome_stock_menu_accel';
+procedure gnome_stock_menu_accel_parse(section:PAnsiChar);cdecl;external libgnomeuidll name 'gnome_stock_menu_accel_parse';
+function gnome_stock_transparent_window(icon:PAnsiChar; subtype:PAnsiChar):PGtkWidget;cdecl;external libgnomeuidll name 'gnome_stock_transparent_window';
+procedure gnome_stock_pixmap_gdk(icon:PAnsiChar; subtype:PAnsiChar; pixmap:PPGdkPixmap; mask:PPGdkPixmap);cdecl;external libgnomeuidll name 'gnome_stock_pixmap_gdk';
 
 
 {$EndIf read_interface}
 {$EndIf read_interface}
 
 

+ 1 - 1
packages/gnome1/src/libgnomeui/libgnomeui.pp

@@ -13,7 +13,7 @@ const
  libgnomeuidll='gnomeui';
  libgnomeuidll='gnomeui';
 
 
 Type
 Type
-   va_list = pchar;
+   va_list = PAnsiChar;
 
 
 {$define read_interface}
 {$define read_interface}
 {$undef read_implementation}
 {$undef read_implementation}

+ 11 - 11
packages/gnome1/src/zvt/libzvt.pp

@@ -87,7 +87,7 @@ type
         color_ctx : PGdkColorContext;
         color_ctx : PGdkColorContext;
         colors : array[0..17] of gulong;
         colors : array[0..17] of gulong;
         ic : PGdkIC;
         ic : PGdkIC;
-        pixmap_filename : Pchar;
+        pixmap_filename : PAnsiChar;
         background : record
         background : record
              pix : PGdkPixmap;
              pix : PGdkPixmap;
              x : longint;
              x : longint;
@@ -151,8 +151,8 @@ type
    TZvtTermClass = record
    TZvtTermClass = record
         parent_class : TGtkWidgetClass;
         parent_class : TGtkWidgetClass;
         child_died : procedure (term:PZvtTerm);cdecl;
         child_died : procedure (term:PZvtTerm);cdecl;
-        title_changed : procedure (term:PZvtTerm; thetype:TVTTITLE_TYPE; newtitle:Pchar);
-        match_clicked : procedure (term:PZvtTerm; event:PGdkEventButton; match:Pchar; data:pointer);
+        title_changed : procedure (term:PZvtTerm; thetype:TVTTITLE_TYPE; newtitle:PAnsiChar);
+        match_clicked : procedure (term:PZvtTerm; event:PGdkEventButton; match:PAnsiChar; data:pointer);
      end;
      end;
    ZVT_TERM_CLASS = PZvtTermClass;
    ZVT_TERM_CLASS = PZvtTermClass;
 
 
@@ -179,8 +179,8 @@ function ZVT_GDK_TOPWIN(t : PGTKWidget) : PGDKWindow;
 function zvt_term_new:PGtkWidget;cdecl;external libzvtdll name 'zvt_term_new';
 function zvt_term_new:PGtkWidget;cdecl;external libzvtdll name 'zvt_term_new';
 function zvt_term_new_with_size(cols:longint; rows:longint):PGtkWidget;cdecl;external libzvtdll name 'zvt_term_new_with_size';
 function zvt_term_new_with_size(cols:longint; rows:longint):PGtkWidget;cdecl;external libzvtdll name 'zvt_term_new_with_size';
 procedure zvt_term_reset(term:PZvtTerm; hard:longint);cdecl;external libzvtdll name 'zvt_term_reset';
 procedure zvt_term_reset(term:PZvtTerm; hard:longint);cdecl;external libzvtdll name 'zvt_term_reset';
-procedure zvt_term_feed(term:PZvtTerm; thetext:Pchar; len:longint);cdecl;external libzvtdll name 'zvt_term_feed';
-function zvt_term_writechild(term:PZvtTerm; data:Pchar; len:longint):longint;cdecl;external libzvtdll name 'zvt_term_writechild';
+procedure zvt_term_feed(term:PZvtTerm; thetext:PAnsiChar; len:longint);cdecl;external libzvtdll name 'zvt_term_feed';
+function zvt_term_writechild(term:PZvtTerm; data:PAnsiChar; len:longint):longint;cdecl;external libzvtdll name 'zvt_term_writechild';
 function zvt_term_forkpty(term:PZvtTerm; do_uwtmp_log:longint):longint;cdecl;external libzvtdll name 'zvt_term_forkpty';
 function zvt_term_forkpty(term:PZvtTerm; do_uwtmp_log:longint):longint;cdecl;external libzvtdll name 'zvt_term_forkpty';
 function zvt_term_closepty(term:PZvtTerm):longint;cdecl;external libzvtdll name 'zvt_term_closepty';
 function zvt_term_closepty(term:PZvtTerm):longint;cdecl;external libzvtdll name 'zvt_term_closepty';
 function zvt_term_killchild(term:PZvtTerm; signal:longint):longint;cdecl;external libzvtdll name 'zvt_term_killchild';
 function zvt_term_killchild(term:PZvtTerm; signal:longint):longint;cdecl;external libzvtdll name 'zvt_term_killchild';
@@ -188,8 +188,8 @@ procedure zvt_term_bell(zvt_term:pointer);cdecl;external libzvtdll name 'zvt_ter
 function zvt_term_get_type:guint;cdecl;external libzvtdll name 'zvt_term_get_type';
 function zvt_term_get_type:guint;cdecl;external libzvtdll name 'zvt_term_get_type';
 procedure zvt_term_set_scrollback(term:PZvtTerm; lines:longint);cdecl;external libzvtdll name 'zvt_term_set_scrollback';
 procedure zvt_term_set_scrollback(term:PZvtTerm; lines:longint);cdecl;external libzvtdll name 'zvt_term_set_scrollback';
 function zvt_term_get_buffer(term:PZvtTerm; len:Plongint; thetype:longint; sx:longint; sy:longint;
 function zvt_term_get_buffer(term:PZvtTerm; len:Plongint; thetype:longint; sx:longint; sy:longint;
-           ex:longint; ey:longint):Pchar;cdecl;external libzvtdll name 'zvt_term_get_buffer';
-procedure zvt_term_set_font_name(term:PZvtTerm; thename:Pchar);cdecl;external libzvtdll name 'zvt_term_set_font_name';
+           ex:longint; ey:longint):PAnsiChar;cdecl;external libzvtdll name 'zvt_term_get_buffer';
+procedure zvt_term_set_font_name(term:PZvtTerm; thename:PAnsiChar);cdecl;external libzvtdll name 'zvt_term_set_font_name';
 procedure zvt_term_set_fonts(term:PZvtTerm; font:PGdkFont; font_bold:PGdkFont);cdecl;external libzvtdll name 'zvt_term_set_fonts';
 procedure zvt_term_set_fonts(term:PZvtTerm; font:PGdkFont; font_bold:PGdkFont);cdecl;external libzvtdll name 'zvt_term_set_fonts';
 procedure zvt_term_hide_pointer(term:PZvtTerm);cdecl;external libzvtdll name 'zvt_term_hide_pointer';
 procedure zvt_term_hide_pointer(term:PZvtTerm);cdecl;external libzvtdll name 'zvt_term_hide_pointer';
 procedure zvt_term_show_pointer(term:PZvtTerm);cdecl;external libzvtdll name 'zvt_term_show_pointer';
 procedure zvt_term_show_pointer(term:PZvtTerm);cdecl;external libzvtdll name 'zvt_term_show_pointer';
@@ -203,10 +203,10 @@ procedure zvt_term_set_default_color_scheme(term:PZvtTerm);cdecl;external libzvt
 procedure zvt_term_set_del_key_swap(term:PZvtTerm; state:longint);cdecl;external libzvtdll name 'zvt_term_set_del_key_swap';
 procedure zvt_term_set_del_key_swap(term:PZvtTerm; state:longint);cdecl;external libzvtdll name 'zvt_term_set_del_key_swap';
 procedure zvt_term_set_del_is_del(term:PZvtTerm; state:longint);cdecl;external libzvtdll name 'zvt_term_set_del_is_del';
 procedure zvt_term_set_del_is_del(term:PZvtTerm; state:longint);cdecl;external libzvtdll name 'zvt_term_set_del_is_del';
 procedure zvt_term_set_wordclass(term:PZvtTerm; klass:Pbyte);cdecl;external libzvtdll name 'zvt_term_set_wordclass';
 procedure zvt_term_set_wordclass(term:PZvtTerm; klass:Pbyte);cdecl;external libzvtdll name 'zvt_term_set_wordclass';
-function zvt_term_match_add(term:PZvtTerm; regex:Pchar; highlight_mask:uint32; data:pointer):longint;cdecl;external libzvtdll name 'zvt_term_match_add';
-procedure zvt_term_match_clear(term:PZvtTerm; regex:Pchar);cdecl;external libzvtdll name 'zvt_term_match_clear';
-function zvt_term_match_check(term:PZvtTerm; x:longint; y:longint; user_data_ptr:Ppointer):Pchar;cdecl;external libzvtdll name 'zvt_term_match_check';
-procedure zvt_term_set_background(terminal:PZvtTerm; pixmap_file:Pchar; transparent:gboolean; flags:longint);cdecl;external libzvtdll name 'zvt_term_set_background';
+function zvt_term_match_add(term:PZvtTerm; regex:PAnsiChar; highlight_mask:uint32; data:pointer):longint;cdecl;external libzvtdll name 'zvt_term_match_add';
+procedure zvt_term_match_clear(term:PZvtTerm; regex:PAnsiChar);cdecl;external libzvtdll name 'zvt_term_match_clear';
+function zvt_term_match_check(term:PZvtTerm; x:longint; y:longint; user_data_ptr:Ppointer):PAnsiChar;cdecl;external libzvtdll name 'zvt_term_match_check';
+procedure zvt_term_set_background(terminal:PZvtTerm; pixmap_file:PAnsiChar; transparent:gboolean; flags:longint);cdecl;external libzvtdll name 'zvt_term_set_background';
 procedure zvt_term_set_shadow_type(term:PZvtTerm; thetype:TGtkShadowType);cdecl;external libzvtdll name 'zvt_term_set_shadow_type';
 procedure zvt_term_set_shadow_type(term:PZvtTerm; thetype:TGtkShadowType);cdecl;external libzvtdll name 'zvt_term_set_shadow_type';
 procedure zvt_term_set_size(term:PZvtTerm; width:guint; height:guint);cdecl;external libzvtdll name 'zvt_term_set_size';
 procedure zvt_term_set_size(term:PZvtTerm; width:guint; height:guint);cdecl;external libzvtdll name 'zvt_term_set_size';
 procedure zvt_term_set_open_im(term:PZvtTerm; state:gboolean);cdecl;external libzvtdll name 'zvt_term_set_open_im';
 procedure zvt_term_set_open_im(term:PZvtTerm; state:gboolean);cdecl;external libzvtdll name 'zvt_term_set_open_im';

+ 7 - 7
packages/gnome1/src/zvt/vt.inc

@@ -77,10 +77,10 @@ type
                 case longint of
                 case longint of
                    0 : ( txt : record
                    0 : ( txt : record
                         args_dummy : array[0..(VTPARAM_MAXARGS)-1] of Pbyte;
                         args_dummy : array[0..(VTPARAM_MAXARGS)-1] of Pbyte;
-                        args_mem : array[0..(VTPARAM_MAXARGS * VTPARAM_ARGMAX)-1] of char;
+                        args_mem : array[0..(VTPARAM_MAXARGS * VTPARAM_ARGMAX)-1] of AnsiChar;
                         argptr_dummy : ^Pbyte;
                         argptr_dummy : ^Pbyte;
-                        outptr : Pchar;
-                        outend_dummy : Pchar;
+                        outptr : PAnsiChar;
+                        outend_dummy : PAnsiChar;
                      end );
                      end );
                    1 : ( num : record
                    1 : ( num : record
                         intargs : array[0..(VTPARAM_INTARGS)-1] of dword;
                         intargs : array[0..(VTPARAM_INTARGS)-1] of dword;
@@ -99,7 +99,7 @@ type
             scrollbackold : longint;
             scrollbackold : longint;
             scrollbackmax : longint;
             scrollbackmax : longint;
             ring_my_bell : procedure (user_data:pointer);cdecl;
             ring_my_bell : procedure (user_data:pointer);cdecl;
-            change_my_name : procedure (user_data:pointer; _type:TVTTITLE_TYPE; name:Pchar);cdecl;
+            change_my_name : procedure (user_data:pointer; _type:TVTTITLE_TYPE; name:PAnsiChar);cdecl;
             dtterm_seq : procedure (user_data:pointer);cdecl;
             dtterm_seq : procedure (user_data:pointer);cdecl;
             user_data : pointer;
             user_data : pointer;
             decode : record
             decode : record
@@ -135,11 +135,11 @@ type
 function vt_init(vt:Pvt_em; width:longint; height:longint):Pvt_em;cdecl;external libzvtdll name 'vt_init';
 function vt_init(vt:Pvt_em; width:longint; height:longint):Pvt_em;cdecl;external libzvtdll name 'vt_init';
 procedure vt_destroy(vt:Pvt_em);cdecl;external libzvtdll name 'vt_destroy';
 procedure vt_destroy(vt:Pvt_em);cdecl;external libzvtdll name 'vt_destroy';
 procedure vt_resize(vt:Pvt_em; width:longint; height:longint; pixwidth:longint; pixheight:longint);cdecl;external libzvtdll name 'vt_resize';
 procedure vt_resize(vt:Pvt_em; width:longint; height:longint; pixwidth:longint; pixheight:longint);cdecl;external libzvtdll name 'vt_resize';
-procedure vt_parse_vt(vt:Pvt_em; ptr:Pchar; length:longint);cdecl;external libzvtdll name 'vt_parse_vt';
+procedure vt_parse_vt(vt:Pvt_em; ptr:PAnsiChar; length:longint);cdecl;external libzvtdll name 'vt_parse_vt';
 procedure vt_swap_buffers(vt:Pvt_em);cdecl;external libzvtdll name 'vt_swap_buffers';
 procedure vt_swap_buffers(vt:Pvt_em);cdecl;external libzvtdll name 'vt_swap_buffers';
 function vt_forkpty(vt:Pvt_em; do_uwtmp_log:longint):pid_t;cdecl;external libzvtdll name 'vt_forkpty';
 function vt_forkpty(vt:Pvt_em; do_uwtmp_log:longint):pid_t;cdecl;external libzvtdll name 'vt_forkpty';
-function vt_readchild(vt:Pvt_em; buffer:Pchar; len:longint):longint;cdecl;external libzvtdll name 'vt_readchild';
-function vt_writechild(vt:Pvt_em; buffer:Pchar; len:longint):longint;cdecl;external libzvtdll name 'vt_writechild';
+function vt_readchild(vt:Pvt_em; buffer:PAnsiChar; len:longint):longint;cdecl;external libzvtdll name 'vt_readchild';
+function vt_writechild(vt:Pvt_em; buffer:PAnsiChar; len:longint):longint;cdecl;external libzvtdll name 'vt_writechild';
 function vt_report_button(vt:Pvt_em; down:longint; button:longint; qual:longint; x:longint;
 function vt_report_button(vt:Pvt_em; down:longint; button:longint; qual:longint; x:longint;
                y:longint):longint;cdecl;external libzvtdll name 'vt_report_button';
                y:longint):longint;cdecl;external libzvtdll name 'vt_report_button';
 procedure vt_scrollback_set(vt:Pvt_em; lines:longint);cdecl;external libzvtdll name 'vt_scrollback_set';
 procedure vt_scrollback_set(vt:Pvt_em; lines:longint);cdecl;external libzvtdll name 'vt_scrollback_set';

+ 6 - 6
packages/gnome1/src/zvt/vtx.inc

@@ -52,8 +52,8 @@ type
      allocated : LongWord;
      allocated : LongWord;
      sed : LongWord;
      sed : LongWord;
      syntax : LongWord;
      syntax : LongWord;
-     fastmap : PChar;
-     translate : PChar;
+     fastmap : PAnsiChar;
+     translate : PAnsiChar;
      can_be_null : Word;
      can_be_null : Word;
      regs_allocated : Word;
      regs_allocated : Word;
      fastmap_accurate : Word;
      fastmap_accurate : Word;
@@ -66,7 +66,7 @@ type
    Tvt_magic_match = record
    Tvt_magic_match = record
         next : Pvt_magic_match;
         next : Pvt_magic_match;
         prev : Pvt_magic_match;
         prev : Pvt_magic_match;
-        regex : Pchar;
+        regex : PAnsiChar;
         preg : Tregex_t;
         preg : Tregex_t;
         highlight_mask : uint32;
         highlight_mask : uint32;
         user_data : pointer;
         user_data : pointer;
@@ -75,7 +75,7 @@ type
    Tvt_match = record
    Tvt_match = record
         next : Pvt_match;
         next : Pvt_match;
         match : Pvt_magic_match;
         match : Pvt_magic_match;
-        matchstr : Pchar;
+        matchstr : PAnsiChar;
         blocks : Pvt_match_block;
         blocks : Pvt_match_block;
      end;
      end;
 
 
@@ -94,7 +94,7 @@ const
 function back_match(var a : Tvtx) : dword;
 function back_match(var a : Tvtx) : dword;
 procedure set_back_match(var a : Tvtx; __back_match : dword);
 procedure set_back_match(var a : Tvtx; __back_match : dword);
 
 
-function vt_get_selection(vx:Pvtx; size:longint; len:Plongint):Pchar;cdecl;external libzvtdll name 'vt_get_selection';
+function vt_get_selection(vx:Pvtx; size:longint; len:Plongint):PAnsiChar;cdecl;external libzvtdll name 'vt_get_selection';
 procedure vt_clear_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_clear_selection';
 procedure vt_clear_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_clear_selection';
 procedure vt_fix_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_fix_selection';
 procedure vt_fix_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_fix_selection';
 procedure vt_draw_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_draw_selection';
 procedure vt_draw_selection(vx:Pvtx);cdecl;external libzvtdll name 'vt_draw_selection';
@@ -106,7 +106,7 @@ procedure vt_set_wordclass(vx:Pvtx; s:Pbyte);cdecl;external libzvtdll name 'vt_s
 function vt_get_attr_at(vx:Pvtx; col:longint; row:longint):longint;cdecl;external libzvtdll name 'vt_get_attr_at';
 function vt_get_attr_at(vx:Pvtx; col:longint; row:longint):longint;cdecl;external libzvtdll name 'vt_get_attr_at';
 procedure vt_free_match_blocks(vx:Pvtx);cdecl;external libzvtdll name 'vt_free_match_blocks';
 procedure vt_free_match_blocks(vx:Pvtx);cdecl;external libzvtdll name 'vt_free_match_blocks';
 procedure vt_getmatches(vx:Pvtx);cdecl;external libzvtdll name 'vt_getmatches';
 procedure vt_getmatches(vx:Pvtx);cdecl;external libzvtdll name 'vt_getmatches';
-procedure vt_match_clear(vx:Pvtx; regex:Pchar);cdecl;external libzvtdll name 'vt_match_clear';
+procedure vt_match_clear(vx:Pvtx; regex:PAnsiChar);cdecl;external libzvtdll name 'vt_match_clear';
 function vt_match_check(vx:Pvtx; x:longint; y:longint):Pvt_match;cdecl;external libzvtdll name 'vt_match_check';
 function vt_match_check(vx:Pvtx; x:longint; y:longint):Pvt_match;cdecl;external libzvtdll name 'vt_match_check';
 procedure vt_match_highlight(vx:Pvtx; m:Pvt_match);cdecl;external libzvtdll name 'vt_match_highlight';
 procedure vt_match_highlight(vx:Pvtx; m:Pvt_match);cdecl;external libzvtdll name 'vt_match_highlight';
 function vtx_new(width:longint; height:longint; user_data:pointer):Pvtx;cdecl;external libzvtdll name 'vtx_new';
 function vtx_new(width:longint; height:longint; user_data:pointer):Pvtx;cdecl;external libzvtdll name 'vtx_new';