mirror of
https://github.com/QB64Official/qb64.git
synced 2024-08-22 04:25:08 +00:00
136 lines
8.5 KiB
Text
136 lines
8.5 KiB
Text
The '''DECLARE LIBRARY''' declaration allows the use of external library [[SUB]] and [[FUNCTION]] procedures supported by QB64.
|
||
|
||
|
||
{{PageSyntax}}
|
||
: '''DECLARE''' [DYNAMIC|CUSTOMTYPE|STATIC] '''LIBRARY''' [{''"Library_filename"''|''"Headerfile"''}]
|
||
: {[[SUB]]|[[FUNCTION]]} [''procedure_name'' {{KW|ALIAS}}] ''library_procedure'' ([{{KW|BYVAL}}] ''parameter {{KW|AS}}'', ...)
|
||
::.
|
||
::. 'other SUBs or Functions as required
|
||
::.
|
||
: '''END DECLARE'''
|
||
|
||
|
||
{{Parameters}}
|
||
* The {{Parameter|Library_filename}} is needed if a Library is not already loaded by QB64. Do not include the ''.DLL'', ''LIB'' or ''.H'' file extension.
|
||
** It's always a good idea to try declaring Windows API libraries without a {{Parameter|Library_filename}} first, as most Windows headers are already included in QB64 source.
|
||
* Begin the {{Parameter|Library_filename}} with '''./''' or '''.\''' to make it relative to the path where your source file is saved, so you can keep all your project files together.
|
||
* {{Parameter|Procedure_name}} is any program procedure name you want to designate by using [[ALIAS]] with the {{Parameter|Library_procedure}} name.
|
||
* {{Parameter|Library procedure}} is the actual procedure name used inside of the library or header file.
|
||
|
||
|
||
===Library Types===
|
||
* '''[[DECLARE DYNAMIC LIBRARY|DYNAMIC]]''' links a program to functions in dynamically linkable libraries. At present, only .DLL files are supported
|
||
* '''CUSTOMTYPE''' is already implied when using [[DECLARE DYNAMIC LIBRARY]]. This type of library just allows the same flexibility to apply when referencing STATIC libraries that are used to refer to dynamic libraries. Supports shared object (*.so) libraries.
|
||
* '''STATIC''' is the same as [[DECLARE LIBRARY]] except that it prioritizes linking to static libraries (*.a/*.o) over shared object (*.so) libraries, if both exist. As Windows doesn't use shared libraries (DLLs are different) this does not affect Windows users.
|
||
|
||
|
||
{{PageDescription}}
|
||
* The declaration can be used with C++ sub-procedures, Windows API and QB64 SDL (versions prior to 1.000)/OpenGL (version 1.000 and up) Libraries.
|
||
* ''Library filename''s can be listed to combine more than one DLL or Header file name or path into one DECLARE LIBRARY block.
|
||
* C procedures can use a header file name. File code must be included with program code. Do not include the ''.h'' extension.
|
||
* ''Parameters'' used by the Library procedure must be passed by value ([[BYVAL]]) except for [[STRING]] characters.
|
||
* When using a procedure from an '''unsupported''' Dynamic Link Library (DLL file) use [[DECLARE DYNAMIC LIBRARY]].
|
||
|
||
* The [[_OFFSET]] in memory can be used in '''CUSTOMTYPE''', '''STATIC''' and '''DYNAMIC LIBRARY''' declarations.
|
||
* Declarations can be made inside of [[SUB]] or [[FUNCTION]] procedures. Declarations do not need to be at program start.
|
||
* '''NOTE: It is up to the user to document and determine the suitability of all Libraries and procedures they choose to use! QB64 cannot guarantee that any procedure will work and cannot quarantee any troubleshooting help.'''
|
||
|
||
|
||
{{PageExamples}}
|
||
''Example 1:'' Using an '''SDL''' library procedure as a program SUB procedure to move the mouse pointer to a coordinate (works in versions prior to 1.000):
|
||
{{CodeStart}} '' ''
|
||
{{Cl|DECLARE LIBRARY}}
|
||
{{Cl|SUB}} SDL_WarpMouse ({{Cl|BYVAL}} column {{Cl|AS}} {{Cl|LONG}}, {{Cl|BYVAL}} row {{Cl|AS}} {{Cl|LONG}}) 'SDL procedure name
|
||
{{Cl|DECLARE LIBRARY|END DECLARE}}
|
||
{{Cl|SCREEN (statement)|SCREEN}} {{Cl|_NEWIMAGE}}(640, 480, 256) 'simulate screen 12 with 256 colors
|
||
{{Cl|RANDOMIZE}} {{Cl|TIMER}}
|
||
|
||
DO
|
||
{{Cl|_DELAY}} 1
|
||
x = {{Cl|RND}} * 640: y = {{Cl|RND}} * 480
|
||
{{Cl|LINE}} (x, y)-{{Cl|STEP}}(10, 10), {{Cl|RND}} * 100 + 32, BF
|
||
MouseMove x + 5, y + 5
|
||
{{Cl|LOOP}} {{Cl|UNTIL}} {{Cl|LEN}}({{Cl|INKEY$}}) 'any keypress quits
|
||
{{Cl|END}}
|
||
|
||
{{Cl|SUB}} MouseMove (x {{Cl|AS}} {{Cl|LONG}}, y {{Cl|AS}} {{Cl|LONG}})
|
||
SDL_WarpMouse x, y 'call SDL library procedure
|
||
{{Cl|END SUB}} '' ''
|
||
{{CodeEnd}}
|
||
{{small|Code by Galleon}}
|
||
:''Explanation:'' The SDL Library is included and loaded with QB64 versions prior to 1.000, so these procedures are directly available for use.
|
||
|
||
<center>'''Using [[ALIAS]] to create a program SUB or FUNCTION''' using '''QB64 SDL ONLY'''</center>
|
||
{{CodeStart}} '' ''
|
||
{{Cl|SCREEN}} 12
|
||
{{Cl|DECLARE LIBRARY}}
|
||
{{Cl|SUB}} MouseMove {{Cl|ALIAS}} SDL_WarpMouse ({{Cl|BYVAL}} column&, {{Cl|BYVAL}} row&)
|
||
{{Cl|DECLARE LIBRARY|END DECLARE}}
|
||
|
||
{{Cl|_DELAY}} 2
|
||
MouseMove 100, 100
|
||
{{Cl|_DELAY}} 2
|
||
MouseMove 200, 200 '' ''
|
||
{{CodeEnd}}
|
||
:''Explanation:'' When a Library procedure is used to represent another procedure name use [[ALIAS]] instead. Saves creating a SUB!
|
||
|
||
|
||
''Example 2:'' Don't know if a C function is defined by C++ or QB64? Try using empty quotes.
|
||
{{CodeStart}} '' ''
|
||
{{Cl|DECLARE LIBRARY}} ""
|
||
{{Cl|FUNCTION}} addone& ({{Cl|BYVAL}} value&)
|
||
{{Cl|END}} DECLARE '' ''
|
||
{{CodeEnd}}
|
||
:''Explanation:'' The C function 'addone' exists in a library QB64 already links to, but it hasn't been defined as a C function or a QB64 function. By using "" we are telling QB64 the function exists in a library which is already linked to and that it must define the C function before calling it, as well as allowing QB64 code to call it. Trying the above code without the "" will fail.
|
||
|
||
: '''Note: What libraries are or aren't automatically used in the linking process is not formally defined, nor is it guaranteed to stay that way in future versions of QB64.'''
|
||
|
||
|
||
''Example 3:'' For this next example, download the file 'add.lib' and place it in you QB64 folder: http://www.qb64.net/add.lib
|
||
{{CodeStart}} '' ''
|
||
{{Cl|DECLARE LIBRARY}} "add"
|
||
{{Cl|FUNCTION}} addtwo& ({{Cl|BYVAL}} value&)
|
||
{{Cl|END}} DECLARE
|
||
PRINT addtwo(1) '' ''
|
||
{{CodeEnd}}
|
||
:''Explanation:'' Here, we tell QB64 to link to '''add.lib''' (QB64 searches for '''add.lib''', '''add.a''', and '''add.o''' in that order and uses the first that it finds). The function '''addtwo''' exists inside the library file '''add.lib''' but isn't defined anywhere else. QB64 creates the C definition for the function '''addtwo''' so that it can be called from our QB64 code.
|
||
|
||
: '''Note: If the C function definition auto-created by QB64 does not exactly match the definition in the library file, it will not work. As a result of this it is often better to provide the C function definitions in the form of a C header file, such as in the following example.'''
|
||
|
||
|
||
''Example 4:'' NTport is a commercial library hosted at http://www.zealsoftstudio.com/ntport/, but it does provide an evaluation version (it has a 3 second wait pop-up window) which we will use here. You don't need to download NTport, just download the following 3 files and put them in your QB64 folder:
|
||
<center>[http://www.qb64.net/ntport/ntport.lib NTport.lib] [http://www.qb64.net/ntport/ntport.h NTport.h] [http://www.qb64.net/ntport/ntport.dll Ntport.dll]</center>
|
||
:'''IMPORTANT:''' The DLL is loaded automatically by the static library, we are not linking directly to the DLL, we are '''static linking''' (NOT directly or dynamically linking). This is an important concept to understand!
|
||
{{CodeStart}}
|
||
DECLARE LIBRARY "ntport"
|
||
FUNCTION GetLPTPortAddress% (BYVAL PortNo%)
|
||
END DECLARE
|
||
PRINT "&H" + HEX$(GetLPTPortAddress%(1))
|
||
{{CodeEnd}}
|
||
:''Explanation:'' DECLARE LIBRARY also searches for C header files with a '''.h''' extension. So in this case it is using the header '''ntport.h''' and linking with '''ntport.lib''' just by specifying "NTPORT". The C function definitions are stored in '''ntport.h''' so even if our QB64 functions don't exactly match (eg. LONG instead of INTEGER) it will still work.
|
||
|
||
:If you look inside ''''ntport.h'''' you'll find the following line containing the C function definition of the command we used:
|
||
{{TextStart}} WORD WINAPI GetLPTPortAddress(WORD PortNo);
|
||
{{TextEnd}}
|
||
|
||
|
||
<center>Galleon's '''OpenGL''' Library with demo program download: http://www.qb64.net/gl_package.zip</center>
|
||
|
||
|
||
<center>'''QB64 version 1.000 and up produce standalone executables. External DLL files must be distributed with your program.'''</center>
|
||
<center>'''Note: QB64 versions prior to 1.000 require all default DLL files to either be with the program or in the C:\WINDOWS\SYSTEM32 folder.'''</center>
|
||
|
||
|
||
''See also:''
|
||
* [[DECLARE DYNAMIC LIBRARY]]
|
||
* [[SUB]], [[FUNCTION]]
|
||
* [[BYVAL]], [[ALIAS]]
|
||
* [[C Libraries]], [[DLL Libraries]], [[Windows Libraries]]
|
||
* [[Port Access Libraries]]
|
||
* [[OpenGL Libraries]], [[SDL Libraries]]
|
||
* [[SFML Libraries]]
|
||
* [[SQL Client]]
|
||
* [http://www.qb64.net/forum/index.php?topic=11810.msg102081#msg102081 DECLARE LIBRARY and C++ Variable Types]
|
||
|
||
|
||
{{PageNavigation}}
|