"Fossies" - the Fresh Open Source Software Archive

Member "FreeBASIC-1.09.0-win64/inc/allegro5/allegro_native_dialog.bi" (1 Jan 2022, 3641 Bytes) of package /windows/misc/FreeBASIC-1.09.0-win64.zip:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Visual Basic source code syntax highlighting (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file.

    1 '' FreeBASIC binding for allegro-5.0.11
    2 ''
    3 '' based on the C header files:
    4 ''   Copyright (c) 2004-2011 the Allegro 5 Development Team
    5 ''
    6 ''   This software is provided 'as-is', without any express or implied
    7 ''   warranty. In no event will the authors be held liable for any damages
    8 ''   arising from the use of this software.
    9 ''
   10 ''   Permission is granted to anyone to use this software for any purpose,
   11 ''   including commercial applications, and to alter it and redistribute it
   12 ''   freely, subject to the following restrictions:
   13 ''
   14 ''       1. The origin of this software must not be misrepresented; you must not
   15 ''       claim that you wrote the original software. If you use this software
   16 ''       in a product, an acknowledgment in the product documentation would be
   17 ''       appreciated but is not required.
   18 ''
   19 ''       2. Altered source versions must be plainly marked as such, and must not be
   20 ''       misrepresented as being the original software.
   21 ''
   22 ''       3. This notice may not be removed or altered from any source
   23 ''       distribution.
   24 ''
   25 '' translated to FreeBASIC by:
   26 ''   Copyright © 2015 FreeBASIC development team
   27 
   28 #pragma once
   29 
   30 #ifdef __FB_UNIX__
   31     #inclib "allegro_dialog"
   32 #elseif defined(__FB_WIN32__) and defined(ALLEGRO_STATICLINK)
   33     #inclib "allegro_dialog-5.0.10-static-md"
   34 #else
   35     #inclib "allegro_dialog-5.0.10-md"
   36 #endif
   37 
   38 #include once "allegro5/allegro.bi"
   39 
   40 extern "C"
   41 
   42 #define __al_included_allegro5_allegro_native_dialog_h
   43 declare function al_init_native_dialog_addon() as byte
   44 declare sub al_shutdown_native_dialog_addon()
   45 type ALLEGRO_FILECHOOSER as ALLEGRO_FILECHOOSER_
   46 declare function al_create_native_file_dialog(byval initial_path as const zstring ptr, byval title as const zstring ptr, byval patterns as const zstring ptr, byval mode as long) as ALLEGRO_FILECHOOSER ptr
   47 declare function al_show_native_file_dialog(byval display as ALLEGRO_DISPLAY ptr, byval dialog as ALLEGRO_FILECHOOSER ptr) as byte
   48 declare function al_get_native_file_dialog_count(byval dialog as const ALLEGRO_FILECHOOSER ptr) as long
   49 declare function al_get_native_file_dialog_path(byval dialog as const ALLEGRO_FILECHOOSER ptr, byval index as uinteger) as const zstring ptr
   50 declare sub al_destroy_native_file_dialog(byval dialog as ALLEGRO_FILECHOOSER ptr)
   51 declare function al_show_native_message_box(byval display as ALLEGRO_DISPLAY ptr, byval title as const zstring ptr, byval heading as const zstring ptr, byval text as const zstring ptr, byval buttons as const zstring ptr, byval flags as long) as long
   52 type ALLEGRO_TEXTLOG as ALLEGRO_TEXTLOG_
   53 declare function al_open_native_text_log(byval title as const zstring ptr, byval flags as long) as ALLEGRO_TEXTLOG ptr
   54 declare sub al_close_native_text_log(byval textlog as ALLEGRO_TEXTLOG ptr)
   55 declare sub al_append_native_text_log(byval textlog as ALLEGRO_TEXTLOG ptr, byval format as const zstring ptr, ...)
   56 declare function al_get_native_text_log_event_source(byval textlog as ALLEGRO_TEXTLOG ptr) as ALLEGRO_EVENT_SOURCE ptr
   57 declare function al_get_allegro_native_dialog_version() as ulong
   58 
   59 enum
   60     ALLEGRO_FILECHOOSER_FILE_MUST_EXIST = 1
   61     ALLEGRO_FILECHOOSER_SAVE = 2
   62     ALLEGRO_FILECHOOSER_FOLDER = 4
   63     ALLEGRO_FILECHOOSER_PICTURES = 8
   64     ALLEGRO_FILECHOOSER_SHOW_HIDDEN = 16
   65     ALLEGRO_FILECHOOSER_MULTIPLE = 32
   66 end enum
   67 
   68 enum
   69     ALLEGRO_MESSAGEBOX_WARN = 1 shl 0
   70     ALLEGRO_MESSAGEBOX_ERROR = 1 shl 1
   71     ALLEGRO_MESSAGEBOX_OK_CANCEL = 1 shl 2
   72     ALLEGRO_MESSAGEBOX_YES_NO = 1 shl 3
   73     ALLEGRO_MESSAGEBOX_QUESTION = 1 shl 4
   74 end enum
   75 
   76 enum
   77     ALLEGRO_TEXTLOG_NO_CLOSE = 1 shl 0
   78     ALLEGRO_TEXTLOG_MONOSPACE = 1 shl 1
   79 end enum
   80 
   81 enum
   82     ALLEGRO_EVENT_NATIVE_DIALOG_CLOSE = 600
   83 end enum
   84 
   85 end extern