🚀 go-pugleaf

Hi, am having a problem with calling a function located in a DLL file, 
Here are the declaration in C:

extern "C" BOOL __declspec(dllexport)StartLinkFile(CString 
strFile,CString port);

and i got a working VC++ example that uses the DLL and that function:

         /**** parameter 1 *****/
         CString strPath = "Sample.txt";
	
         /**** parameter 2 *****/
         CString strPort[4] = {"COM1","COM2","COM3","COM4"};
         CString port = strPort[0];

         /**** dllexport function define ****/
	typedef BOOL(StartLinkFileProc)(CString,CString);
	HINSTANCE hInstance;
	StartLinkFileProc* StartLinkFile;
	
        	/**** Get DLL Handle, Save Resource ****/
         HINSTANCE hInstResource = AfxGetResourceHandle();	
         VERIFY(hInstance = ::LoadLibrary("Download.dll"));
         AfxSetResourceHandle(hInstance);

         /**** Get dllexport function ****/
         VERIFY(StartLinkFile = 
(StartLinkFileProc*)::GetProcAddress((HMODULE)hInstance,"StartLinkFile"));

	
         /**** use dllexport ****/
	StartLinkFile(strPath,port);

         /**** restore resource ****/
	AfxSetResourceHandle(hInstResource);


I tried porting this code into Delphi but was unable to! anybody can help?


Regards
LR