VB and Callback functions

[Geoff Turner]

Hi all,
I am trying to write a simple DLL that calls back to the VB app that
called it in the first place.
Below is the code in the DLL
// start of code
FARPROC addr1 = NULL;
FARPROC addr2 = NULL;

extern "C" long _stdcall EXPORT Store (FARPROC a1, FARPROC a2)
{
addr1=a1;
addr2=a2;
return 0;
}

extern "C" long _stdcall EXPORT Execute (FARPROC addr)
{

long result;

if (addr1 == NULL)
return -1;
result = addr1();
result = addr2();
return result;
}

extern "C" long _stdcall EXPORT Execute2 (FARPROC addr , long value)
{
long result;
result = addr( value);
return result;
}
// end of code.

Now Store and Execute run OK.
Execute2 won't compile. I get the following error message:

"...Pointers.cpp(93) : error C2197: 'int (__stdcall *)(void)' : too many
actual parameters"
with the line 'result = addr(value);' producing the error.
What am I not doing correctly?

TIA
Geoff Turner.

[MRe]

> extern "C" long _stdcall EXPORT Execute2 (FARPROC addr , long value)

{
long result;
result = addr( value);
return result;
}
// end of code.

Now Store and Execute run OK.
Execute2 won't compile. I get the following error message:

"...Pointers.cpp(93) : error C2197: 'int (__stdcall *)(void)' : too many
actual parameters"
with the line 'result = addr(value);' producing the error.
What am I not doing correctly?

FARPROC is defined as...

typedef int (FAR WINAPI *FARPROC)();

....thus takes no parameters! Use something likes...

typedef long (WINAPI* FURTHERPROC)(long Value);

extern "C" long _stdcall EXPORT Execute2 (FURTHERPROC addr , long value)
Regards,
MRe

[Geoff Turner]

"MRe" <re************@dublin.ie> wrote in message
news:dw*****************@news.indigo.ie...

extern "C" long _stdcall EXPORT Execute2 (FARPROC addr , long value)
{
long result;
result = addr( value);
return result;
}
// end of code.

Now Store and Execute run OK.
Execute2 won't compile. I get the following error message:

"...Pointers.cpp(93) : error C2197: 'int (__stdcall *)(void)' : too many
actual parameters"
with the line 'result = addr(value);' producing the error.
What am I not doing correctly?

FARPROC is defined as...

typedef int (FAR WINAPI *FARPROC)();

...thus takes no parameters! Use something likes...

typedef long (WINAPI* FURTHERPROC)(long Value);

extern "C" long _stdcall EXPORT Execute2 (FURTHERPROC addr , long value)
Regards,
MRe

Thank you very much, that's just want I want.

Regards,
Geoff.