PureBasic Forums - English

Code: Select all

 
#include <stdio.h> 
#include <windows.h> 
 

struct cpVect 
{
   float x; 
   float y;
};

typedef cpVect (*MYPROC)(float); 

 
VOID main(VOID) 
{ 
    HINSTANCE hinstLib; 
    MYPROC ProcAdd; 
    BOOL fFreeResult, fRunTimeLinkSuccess = FALSE; 
 
    // Get a handle to the DLL module.

 
    hinstLib = LoadLibrary(TEXT("chipmunk-4.0.2.dll")); 
 
    // If the handle is valid, try to get the function address.
 
    if (hinstLib != NULL) 
    { 
        printf("DLL loaded.\n"); 
		ProcAdd = (MYPROC) GetProcAddress(hinstLib, "cpvforangle"); 

        // If the function address is valid, call the function.
 
        if (NULL != ProcAdd) 
        {
            fRunTimeLinkSuccess = TRUE;

			cpVect c = (ProcAdd) (1.0); 
			printf( "\nx:   %f\n", c.x);
			printf( "\ny:   %f\n", c.y);
        }
 
        // Free the DLL module.
 
        fFreeResult = FreeLibrary(hinstLib); 
    } 
 
    // If unable to call the DLL function, use an alternative.
 
    if (! fRunTimeLinkSuccess) 
        printf("Message via alternative method\n"); 
}