Convertir aplicación en dll

[jars]

No, la aplicación la estoy empezando a desarrollar yo.

[jars]

Pregunto, tengo que exportar el FormCreate de la dll???

[Ñuño Martínez]

Tienes que definir el API tú mismo: Qué funciones y procedimientos publicar, qué pretende hacer con cada uno, etc.

Como te veo muy perdido, deberías empezar leyendo la documentación acerca de cómo crear una DLL y utilizarla.

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

Si no lo has hecho ya, échale un vistazo a esta entrada en mi blog.

Ahí se explican varias opciones, entre ellas, la que tú estás intentando aplicar a tu aplicación. en tu caso, la que está etiquetada como:
"EXE + DLL con Carga dinámica(El EXE puede ser con o sin BWRP)"

Al final tienes los ejemplos con código fuente para que puedas probar.

el que se aplica en tu caso, sería algo así:

Código Delphi [-]
  // Cargar la DLL
  H := LoadLibrary('SUMAS.DLL');
  // Cargada correctamente?
  if (H >= 32) then begin
    MessageDlg('Cargada la DLL...', mtInformation, [mbOK], 0);
    sum := nil;
    @sum := GetProcAddress(H, 'Sumar2');
    // Asignada?
    if Assigned(sum) then begin
      MessageDlg('Acceso a la función SUMAR', mtInformation, [mbOK], 0);
      // llamada
      res := Sum(4,5);
      MessageDlg(Format('Resultado:  %d+%d=%d',[4,5,res]), mtInformation, [mbOK], 0);
      FreeLibrary(H);
    end;
    else begin
      MessageDlg('Error, no se ha encontrado el método SUMAS2', mtError, [mbOk], 0) 
    end;
  end
  else
    MessageDlg('Error, no se ha encontrado SUMAR.DLL', mtError, [mbOk], 0)
 end.

Las definiciones serían estas:

Código Delphi [-]
var
  H: Thandle;
  res:integer;
  Sum: function(x,y:Integer):integer; stdcall;

En este caso la DLL SUMAS.DLL sería la que tú estás programando y el método Sumar2, el equivalente al que deberías programar tú para que se muestre el formulario que quieres.

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

Al final de esa entrada, tienes algunos links a otras, sobre cómo trabajar con plugins.

[jars]

Neftali, ya había leído tu artículo y he trabajado con dll´s que exportaban algunas funciones.
Lo distinto aca es que es una aplicación que ya está funcionando como .exe y necesito poder ejecutarla desde una app.
Esta app tiene el formcreate y formshow donde hago inicializaciones y lectura de un par de ini´s. No se si tengo que exportar el formcreate y formshow ó que hacer para que la misma arranque dentro de la nueva app que la instancia.

[[escafandra]]

Para hacer eso, la dll no debe tener el formato de una aplicación, sino un formulario. Puedes tener los formularios que quieras. Te pongo un ejemplo:

La dll:

Código Delphi [-]
library Formdll;

uses
  SysUtils, Windows,
  Classes,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

// Creas tu formulario principal y lo destruyes al salir...
procedure Init;
var
   Form1: TForm1;
begin
   Form1:= TForm1.Create(nil);
   Form1.ShowModal();
   Form1.free;
end;

begin
 Init;
end.

En la aplicación que ejecuta la dll:

Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
var
  Dll: String;
begin
  // Suponiendo que la dll esta en la ruta de este ejecutable...
  Dll:= ExtractFilePath(ParamStr(0)) + 'Formdll.dll';
  LoadLibrary(PCHAR(Dll));
end;

Saludos.

[jars]

Gracias Escafandra.
Ahora todos los formularios comparten un DataModule con distintos objetos de BBDD, de que mopdo se pueden compartir.
Lo mismo sucede con variables publicas que se encuentran en el formulario principal.
Gracias