PDA

Ver la Versión Completa : Funcion dentro de una DLL


Fita
15-06-2013, 18:59:56
Hola a todos.
Estoy incursionando en la creación de dll's para mis aplicaciones y me encuentro con el siguiente problema.
Una de las funciones que he pasado desde mi aplicación a la dll llama a otra función que debe estar dentro de la misma dll.
Ejemplo:

function CreaCadena(nEmpresa: integer);
var cCadena: string;
begin
cCadena := cCadena + '1';
cCadena := cCadena + intTostr(Get_Digito(nEmpresa));
end;

Get_Digito es una función que debe estar en la dll ya que es utilizada solamente por la funcion que la llama .

Como se declara?

Muchas gracias por adelantado
Saludos

cloayza
15-06-2013, 19:17:07
library Tu_Libreria;

uses
SysUtils,
Classes;
{$R *.res}

function Get_Digito(nEmpresa:Integer):Integer;
begin
//Tu codigo...
end;

function CreaCadena(nEmpresa: integer):String;stdcall;
var cCadena: string;
begin
cCadena := cCadena + '1';
cCadena := cCadena + intTostr(Get_Digito(nEmpresa));
end;

Exports
CreaCadena;
begin

end.


Saludos cordiales

Fita
15-06-2013, 19:43:02
Muchas Gracias Cloayza !!

abrazo
Fita