¿Es posible incluir rutinas C++ en aplicacion Delphi?

[compuin]

Buenas tardes

Es posible incluir rutinas en C++ en mi aplicacion con Delphi, es decir, hacer un ejecutable con ambas rutinas ?

Alguna idea o experiencia ?

[Casimiro Notevi]

Define "rutinas".
Puedes incluir "objetos", bibliotecas, etc. creadas con c++, pero rutinas no sé exactamente a qué te refieres.

[compuin]

Ok,

Me disculpo por lo poco claro que fui.

Rutinas o funciones de calculo por ejemplo

[[escafandra]]

Delhi no compila C++ pero Builder si compila delphi. La fira de incluir funciones escritas en C, con cualquier compilador C, es con dlls, o incorporando ar hijos obj al proyecto Delphi, cosa que si puede hacer. Esto se hace con la directiva

Código Delphi [-]
{$LINK filename}

Link object file (Delphi)


Saludos.

[Neftali [Germán.Estévez]]

Otra opción es meterlas en una DLL y llamarlas desde tu aplicación Delphi (o lo que sea).

[compuin]

Muchas gracias

Me podrian decir como llamo estas funciones desde Delphi si las coloco en una DLL ?

[[escafandra]]

Un ejemplo de como importar la API wsprintf desde User32.dll

Código Delphi [-]
function wsprintf(lpOut, lpFmt: PChar): Integer; cdecl; varargs; external 'User32.dll' name 'wsprintfA';

Saludos.

[compuin]

Muchas gracias a todos por sus aportes

[Neftali [Germán.Estévez]]

La otra opción es con LoadLibrary y GetProcAddress, para hacerlo de forma dinámica.

[compuin]

Empezado por Neftali [Germán.Estévez]

La otra opción es con LoadLibrary y GetProcAddress, para hacerlo de forma dinámica.

Hola

Podrias colocar un ejemplo de ello ?

[Neftali [Germán.Estévez]]

Empezado por compuin

Podrias colocar un ejemplo de ello ?

https://www.clubdelphi.com/foros/showthread.php?t=92441
https://stackoverflow.com/questions/...-dll-in-delphi

[compuin]

Empezado por escafandra

Un ejemplo de como importar la API wsprintf desde User32.dll

Código Delphi [-]
function wsprintf(lpOut, lpFmt: PChar): Integer; cdecl; varargs; external 'User32.dll' name 'wsprintfA';

Saludos.

Hola,

He tratado de hacerlo asi pero me arroja un error, el cual dice lo siguiente

The procedure entry point MYFUNCION could not be located in the dynamic link library MYDLL.DLL

La funcion existe en el DLL, el cual fue creado con Borland C++ 7.4

Alguna sugerencia ?

[[escafandra]]

Empezado por compuin

Hola,

He tratado de hacerlo asi pero me arroja un error, el cual dice lo siguiente

The procedure entry point MYFUNCION could not be located in the dynamic link library MYDLL.DLL

La funcion existe en el DLL, el cual fue creado con Borland C++ 7.4

Alguna sugerencia ?

El hecho de que uses una función en una dll no implica que esa dll la exporte. depende de la dll que realmente la exporta. Implemente una función en tu dll, expórtala e impórtala de forma estática desde delphi. Eso es lo que debe funcionar.

Código PHP:

__declspec(dllexport)

int MyFuncion(int parametro)
{
  return parametro*2;
} 


Código Delphi [-]
function MyFuncion(parametro: integer): integer; cdecl; external 'MyDLL.dll' name 'MyFuncion';

Saludos.