Create Dll C++ in VS 2015 compatible with Inno Setup

[MCI]

Hi!

I would like to know if you can help create a post that explains in detail how to create a C ++ Dll Compatible with Inno Setup, since for some time I have not been able to do it in a stable way, to achieve this come here to see if they can help me.

my problem is always the same, the Dll does not run on a PC in which it has not been compiled ... I do not explain how this happens but I invite you to look at this code. and tell me if it contains errors or something.

Name of DLL is IsFunc.dll

for now it only contains a single function exported .. because it is not necessary to show all the source code if the error is always given ... with any number of internal functions or exporteds.

Header.h

#pragma once
#include <Windows.h>

DllMain.cpp

#include "Header.h"
HWND AppHandle = 0;

BOOL __stdcall EnumProc(HWND hWnd, LPARAM lParam)
{
	DWORD Pid;
	WCHAR cl[14];
	GetWindowThreadProcessId(hWnd, &Pid);
	GetClassNameW(hWnd, cl, 13);

	if (Pid == GetCurrentProcessId())
		if (wcsstr(cl, L"TApplication"))
			AppHandle = hWnd;

	return TRUE;
};

void Dll_Start(void)
{
	EnumWindows(EnumProc, 0);
};

void Dll_Stop(void)
{};

BOOL __stdcall DllMain(HMODULE hModule, DWORD ul_reason_for_call, LPVOID lpReserved)
{
	switch (ul_reason_for_call)
	{
	case DLL_PROCESS_ATTACH:
		Dll_Start();
		break;

	case DLL_PROCESS_DETACH:
		Dll_Stop();
		break;
	};

	return TRUE;
};

IsFunc.cpp

#include "Header.h"
extern HWND AppHandle;

HWND __stdcall GetAppHandle(void)
{
	return AppHandle;
};

Defin.def

LIBRARY "IsFunc"
EXPORTS
	GetAppHandle

The purpose of the GetAppHandle function is to get the Application.Handle which can not be obtained in version 5.5.9 of Inno Setup. I know that you can get this value without any Dll but it is indispensable that the Dll conosca the value of the Application.Handle so that the other functions that I will show you can work ... Personally I do not like working with Inno Setup version 5.5.1 Advance .. I prefer version 5.5.9 for the new features ..

Inno Setup Script

[Setup]
AppId={{684EB0C0-995E-4B93-916E-01B0AFA5EA45}
AppName=Test
AppVersion=1.5
;AppVerName=Test
AppPublisher=Test
AppPublisherURL=http://www.example.com/
AppSupportURL=http://www.example.com/
AppUpdatesURL=http://www.example.com/
CreateAppDir=no
OutputDir=.\
OutputBaseFilename=test
Compression=lzma
SolidCompression=yes

[Languages]
Name: "default"; MessagesFile: "compiler:Default.isl"

[Files]
Source: "IsFunc.dll"; Flags: dontcopy;

function GetAppHandle(): Longint;
external 'GetAppHandle@files:IsFunc.dll stdcall';

function InitializeSetup(): Boolean;
begin
  MsgBox(IntToStr(GetAppHandle()), mbInformation, MB_OK);
end;

[CENTER]That's all the source Code ..

During compilation there are no errors or anything ..

It works perfectly in the image you see the value obtained by the function GetAppHandle

And here is the problem ..

but if I try on another PC this happens

Apparently it's as if the linked function does not exist.??

And after performing debugging tests with VS I realized that the Dll is loaded into memory and the code of the DllMain function is executed but it just does not connect to the other functions

Despite my lack of experience in creating Dlls .. I have programming skills in the C ++, Delphi, Inno Setup, Java, PHP, HTML, and others languages and never had a problem of this type

I think maybe I'm missing some property in the VS solution or maybe I'm creating it in the wrong way, to work on Inno Setup

Thank you in advance for any help

[felice2011]

wow seems interesting I follow with pleasure, but unfortunately this is not a programming forum, let's see who goes on..

[ravencrow]

#include <windows.h>

HANDLE __stdcall MyHandle(void)
{
  return GetCurrentProcess();
}

EXPORTS
  MyHandle

[MCI]

Originally Posted by ravencrow

#include <windows.h>

HANDLE __stdcall MyHandle(void)
{
  return GetCurrentProcess();
}

EXPORTS
  MyHandle

Friend this function does not return the desired value .. But thanks .. the problem in is the why the dll does not work on another pc, and it is still trying and I think it is that it has some dependence but they do not understand why .. :confuso: :confuso:

[felice2011]

It does not work on another PC because the *.dll created/written, must be saved in the executable to be rewritten/read in other PC systems. Or at least I guess this is your problem..

[MCI]

Originally Posted by felice2011

It does not work on another PC because the *.dll created/written, must be saved in the executable to be rewritten/read in other PC systems. Or at least I guess this is your problem..

The problem is that the DLL does not run .... on another PC ... It only works on the PC on which it was written / created

[MCI]

I'm going to upload the complete source code to see if that makes it easier to solve the problem.

[felice2011]

Originally Posted by MCI

The problem is that the DLL does not run .... on another PC ... It only works on the PC on which it was written / created

Check that the code creates the same path on another PC and reads and decodes the DLL in the existing path

[MCI]

Originally Posted by felice2011

Check that the code creates the same path on another PC and reads and decodes the DLL in the existing path

In effect this happens since the DLL is included in a test with Inno Setup , and when transferring the creator file by Inno Setup, the displayed error occurs. at the time of running it on another PC.

[kassane]

HANDLE __stdcall MyHandle(void)
{
  return AppHandler;
}

to:

extern "C" __declspec(dllexport) HANDLE MyHandle(void)
{
  return AppHandler;
}

My Example: using [Inno-Setup 5.5.1 + DLL(MSVC 2017 x86)] Works!

//MyDll.cpp

#pragma once

typedef long int HWND;

extern "C" __declspec(dllexport) HWND Func(void)
{
	return 30*5; //150
}

[MCI]

Originally Posted by kassane

HANDLE __stdcall MyHandle(void)
{
  return AppHandler;
}

to:

extern "C" __declspec(dllexport) HANDLE MyHandle(void)
{
  return AppHandler;
}

My Example: using [Inno-Setup 5.5.1 + DLL(MSVC 2017 x86)] Works!

//MyDll.cpp

#pragma once

#ifdef MYDLL_EXPORTS
#define MYDLL __declspec(dllexport) 
#else
#define MYDLL __declspec(dllimport) 
#endif

typedef long int HWND;

extern "C" __declspec(dllexport) HWND Func(void)
{
	return 30*5;
}

not working, same problem occurs

[kassane]

Originally Posted by MCI

not working, same problem occurs

Weird! Well, it worked normally here. Did you test my simple example?

--------------------------------------------------------------------
Update:

-- c++ src updated english strings example
-- Obj. Pascal (freepascal and Delphi) src added
-- setup src and demo

Note: (demo) C++ DLL require vcredist 2017!
Install vcredist 2017:

https://go.microsoft.com/fwlink/?LinkId=746571

[MCI]

Originally Posted by kassane

Weird! Well, it worked normally here. Did you test my simple example?

The problem seems to have already been resolved. Apparently a bad set up the C ++ compiler.

anyway, thank you.

I'm going to upload a file so that you can test it all that you want, and I'd appreciate it if you inform me the result ..

[kassane]

Update example!

[MCI]

Originally Posted by kassane

Update example!

Try it on another pc so you can see that it does not work.