Ver Mensaje Individual
  #2  
Antiguo 23-07-2010
sferron1 sferron1 is offline
Registrado
 
Registrado: dic 2009
Posts: 9
Reputación: 0
sferron1 Va por buen camino
Saber quien llama una dll

Cita:
Empezado por capo979 Ver Mensaje
Hola

Hay alguna forma de saber dentro de mi dll en Delphi un punto de quien la llamo o algo de saber quien la llamo o nombre de la aplicacion o algo.

Muchas gracias

saludos
Seguramente hay mil maneras. Yo te propongo una muy simple. Usar la variable global Application. Su propiedad exename te da el path y el nombre del exe que ejecuta la función. Es obvio que este sistema requiere que en cada una de las funciones en las que necesites este control implementes un código semejante a este (aunque también habrá mil maneras más sofisticadas de conservar la información). Tendrás que incluir el módulo Forms en el uses.

Código Delphi [-]
//procedure de una dll
procedure AbrirBaseDeDatos; export;
var lista:TStringList;
begin
     // CODIGO PARA CONSERVAR EL EJECUTABLE QUE LLAMA LA PROCEDURE 
     lista:=TStringList.Create;
     lista.LoadFromFile('c:\exename.txt');
     lista.Add(Application.ExeName);
     lista.SaveToFile('c:\exename.txt');
     lista.Free;
     ///////////////////////////////////////////////////////
 
     if not assigned(main) then
          main:=TDM_Main.Create(nil);
end;
No sé si es bien bien lo que necesitas.
Saludos
Responder Con Cita