Accessing DLL - Issues with .net or VB dll

[steve4king]

I'm trying to access a MagTek library to control some hardware. (IPADLib.dll / MTIPADlib.dll)
MagTek has also included MYIPADLib.h and MTIPADLib.lib. (The MT..dlls are used for VC/VB)

I found a .tlb in some sample code which loaded into the Fox object browser, so Intellisense is working. However, I'm unable to create an olecontrol class from any of the DLLs. Attempting to do so results in an Error box with no dialog.

LOCAL ctlIPAD as "IPADLib.IPAD"
ctlIPAD = CREATEOBJECTEX("IPADLIB.IPAD","","")
ctlIPAD.RequestSig(50,1)

This code results in "Class not Registered".
I originally attempted to register a library with regsvr32, after that failed, I used regasm which returned, "Type registered successfully". Despite this, Fox still complains that it is not registered.

Do I need to create my own wrapper in C# with the correct exposure?
Can I use the MT...Dlls with simpler declare instead?

Thanks,



-Stephen

 

[Olaf Doschke]

How about using OCX instead of Assembly?

http://www.magtek.com/support/software/ocx/

Bye, Olaf.

 

[steve4king]

They don't appear to have an OCX for the MagTek IPAD unfortunately.
(terrible name "IPAD", for something that has nothing to do with Apple's tablet)

-Stephen

 

[steve4king]

Well, I decided to play with the less pretty MTIPADLIB.DLL to see whether this would work any better.
Not too much luck here either..

The call results in 5, even if I use a bogus class name.
I tried declaring as both "MTIPADLIB_API.MTIPADRequestSig" and just "MTIPADRequestSig". But since the result is the same if I use "Bogus", I'm guessing I'm calling this wrong still.


My Code:

PROCEDURE ipad
	LOCAL something as Integer, lcBuffer1, lcBuffer2, lcBuffer3, lcBuffer4
	
	**args 1,2,4 are Bytes, but BYTE is not available for DLL declarations, arg 3 is a structure containing a byte and an integer
	DECLARE integer MTIPADLIB_API.MTIPADRequestSig IN F:\Work\MBZ.153\Libs\MTIPADLIB.dll ;
	  String bOne, String bTwo, String @ objThree, String @ bFour
	
	something = 0
	lcBuffer1 = Repli(Chr(1), 1)	&& byte
	lcBuffer2 = Repli(Chr(1), 1) 	&& byte
	lcBuffer3 = Repli(Chr(0), 7169) && byte[7168] + int as Reference
	lcBuffer4 = Repli(Chr(0), 1) 	&& byte as reference
	
	something = MTIPADRequestSig(lcBuffer1, lcBuffer2, @lcBuffer3, @lcBuffer4) 
	?something && results in 5
	
ENDPROC

MTIPADLIB.H

#ifdef MTIPADLIB_EXPORTS
#define MTIPADLIB_API __declspec(dllexport)
#else
#define MTIPADLIB_API __declspec(dllimport)
#endif
#include <iostream>
#include <string>
using namespace std;

#define MAX_SIGDATA_LENGTH 7168

typedef struct _SIG_DATA
{
	BYTE *Data;
	int Sig_Length;
}SIG_DATA;


MTIPADLIB_API int _stdcall MTIPADRequestSig(BYTE waitTime, BYTE tones, SIG_DATA* pData, BYTE *opStatus);

VC Sample

m_SigData.Data = new BYTE[MAX_SIGDATA_LENGTH];
retCode = MTIPADRequestSig(waitTime, tone, &m_SigData, &opStatus)

Any pointers?
Thanks!

-Stephen

 

[steve4king]

Bahh.. Fox wasn't attempting to reload the class each time I altered the code.

It does recognize an invalid class name, thus it IS finding the function when I call it with:
DECLARE integer MTIPADRequestSig.

Probably not a code problem here, I'm guessing I just need to call a few things to initialize the device first.
I'll update when I get that figured out.

-Stephen

 

[steve4king]

Hah,
It worked fine.

Thanks y'all for being my sounding board, hopefully this long-winded post will be useful to someone else down the road.



-Stephen