Lex System 3I810BW, Manual

Page: 39 / 97

34
F75113 GPIO Picture
Introduction
F75113 driver connection
GPIO Status Register Write
hinstLib = LoadLibrary(L"Fintek.dll");
if (hinstLib == NULL)
{
if(Application->MessageBoxW(L"Load fail Fintek.dll,Continued?",L"Error",16+4)==IDNO)
{
Application->Terminate();
}
return;
}
SETINT2PROC ProcAdd;
char *endptr;
char Numbers[] = "0x20";
char Value[] = "0xF0";
ProcAdd = (SETINT2PROC) GetProcAddress(hinstLib, "GPIO_LPC_W");
if (NULL != ProcAdd)
{
if (! (*ProcAdd)( strtol(Numbers, &endptr, 16), strtol(Value, &endptr, 16)))
{
ShowMessage("Write Fail");
}
}