Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-06-2013
Fita Fita is offline
Miembro
 
Registrado: jul 2003
Ubicación: Pilar - Argentina
Posts: 216
Poder: 21
Fita Va por buen camino
Funcion dentro de una DLL

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
__________________
No te vayas sin irte
Responder Con Cita
  #2  
Antiguo 15-06-2013
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 913
Poder: 23
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Código Delphi [-]

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
Responder Con Cita
  #3  
Antiguo 15-06-2013
Fita Fita is offline
Miembro
 
Registrado: jul 2003
Ubicación: Pilar - Argentina
Posts: 216
Poder: 21
Fita Va por buen camino
Muchas Gracias Cloayza !!

abrazo
Fita
__________________
No te vayas sin irte
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Ayuda con Funcion dentro de DLL n03l Varios 3 29-12-2011 20:09:37
como se crea una funcion dentro de una dll ronimaxh Varios 3 29-12-2011 00:37:25
error de funcion dentro de un stringlist... Greco Varios 6 03-09-2008 08:57:08
llamada a una funcion dentro de una dll mauqu Varios 4 16-10-2007 17:47:57
TQuery dentro de una funcion Function jorgito Varios 4 26-09-2005 15:44:57


La franja horaria es GMT +2. Ahora son las 14:32:59.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi