From 6475cd8e422b88e8d0fa3499195e6392bd3bbf12 Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Sun, 22 Dec 2024 23:39:42 +0100 Subject: Drop Kylix support A piece of history, will be remembered. --- UGnome.pas | 11 ----------- 1 file changed, 11 deletions(-) (limited to 'UGnome.pas') diff --git a/UGnome.pas b/UGnome.pas index 5edab31..9a04734 100644 --- a/UGnome.pas +++ b/UGnome.pas @@ -179,12 +179,7 @@ const AFTER_ALL_TABS = -1; var libGlib2Handle, libGio2Handle, libGtk2Handle, libGnome2Handle, libGnomeUI2Handle: Pointer; gnome_about_new: function (const name, version, copyright, comments: Pchar; const authors, documenters: PPchar; const translator_credits: Pchar; logo_pixbuf: PGdkPixbuf): PGtkWidget; cdecl; -{$IFDEF KYLIX} - gnome_program_init: function (const app_id, app_version: PChar; const module_info: Pointer; argc: longint; argv: PPChar; - const first_property_name: PChar; const first_property_value: Int64; const second_property_name: PChar): Pointer; cdecl; -{$ELSE} gnome_program_init: function (const app_id, app_version: PChar; const module_info: Pointer; argc: integer; argv: PPChar): Pointer; varargs; cdecl; -{$ENDIF} libgnome_module_info_get: function: Pointer; cdecl; libgnomeui_module_info_get: function: Pointer; cdecl; gnome_color_picker_new: function: PGnomeColorPicker; cdecl; @@ -202,15 +197,9 @@ var libGlib2Handle, libGio2Handle, libGtk2Handle, libGnome2Handle, libGnomeUI2Ha gtk_icon_size_lookup_for_settings: function (settings: PGtkSettings; size: TGtkIconSize; width, height: Pgint): gboolean; cdecl; gtk_window_set_icon_name: procedure (window: PGtkWindow; const name: Pgchar); cdecl; g_filename_display_name: function (const filename: PChar): PChar; cdecl; -{$IFDEF KYLIX} - gtk_message_dialog_new_with_markup: function (parent:PGtkWindow; flags:TGtkDialogFlags; - _type:TGtkMessageType; buttons:TGtkButtonsType; - message_format:Pgchar; const format1: PChar; const format2: PChar):PGtkWidget; cdecl; -{$ELSE} gtk_message_dialog_new_with_markup: function (parent:PGtkWindow; flags:TGtkDialogFlags; _type:TGtkMessageType; buttons:TGtkButtonsType; message_format:Pgchar):PGtkWidget; varargs; cdecl; -{$ENDIF} g_mkdir_with_parents: function (const pathname: PChar; mode: integer): integer; cdecl; __g_io_error_from_errno: function (err_no: gint): GIOErrorEnum; cdecl; -- cgit v1.2.3