[Solucionado] Cargar DLL a memoria

Iniciado por seba123neo, 15 Septiembre 2010, 02:58 AM

0 Miembros y 1 Visitante están viendo este tema.

seba123neo

Hola, tengo una duda sobre como cargar una dll a memoria y asi usarla en el programa a la cual esta referenciada.

mi objetivo es embeber como recurso las dll dentro del .exe y asi al ejecutarse el programa cargar esas dll a memoria y usar el programa normalmente.

la DLL en cuestion es un control que te agrega varios controles en la barra de herramientas, botones, etc...todos personalizados.

ya he probado de los ejemplos basicos de ponerla como recurso y despues leerla y escribirla en el disco y asi el programa la carga bein, el tema de esto es que yo no quiero escribirla en el disco, quiero usarla desde memoria.

de ultima si hay problemas con esto de cargarla desde memoria, lo que me solucionaria el tema es que se escriba en el disco (como ya hice) pero que la tome bien desde cualquier parte, porque solo la toma desde el mismo directorio donde esta el .exe, habria que ver como decile que la saque de cualquier lado que se especifique.

tampoco puedo usar un LoadLibrary ya que yo no quiero ejecutar funciones que estan dentro de la dll, esta dll son botones personalizados, es como un control de usuario.

gracias desde ya.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

[D4N93R]

Hola,

Bueno tienes que cargar el assembly en memoria, tienes que usar la clase Assembly en System.Reflection.

Supongo que ya sabes como embeber el assembly dentro del exe. Lo que tienes que hacer es sacar el byte[] y meterlo en Assembly.Load(byte[] aca)

Con eso debería funcionar porque queda cargado dentro del application domain, es lo mismo que pasa cuando referencias un assembly con VS.

Entonces deberias usar es AppDomain.CurrentDomain.Load() la sobrecarga que más te convenga. Sino funciona habrá que usar AppDomain.CurrentDomain.AssemblyResolve y pasarle el assembly cuando no lo encuentre..

Saludos!

seba123neo

Cita de: [D4N93R] en 15 Septiembre 2010, 03:16 AM
Hola,

Bueno tienes que cargar el assembly en memoria, tienes que usar la clase Assembly en System.Reflection.

Supongo que ya sabes como embeber el assembly dentro del exe. Lo que tienes que hacer es sacar el byte[] y meterlo en Assembly.Load(byte[] aca)

Con eso debería funcionar porque queda cargado dentro del application domain, es lo mismo que pasa cuando referencias un assembly con VS.

Entonces deberias usar es AppDomain.CurrentDomain.Load() la sobrecarga que más te convenga. Sino funciona habrá que usar AppDomain.CurrentDomain.AssemblyResolve y pasarle el assembly cuando no lo encuentre..

Saludos!

gracias por responder [D4N93R] , vos sabes que ya habia probado con lo que me contas, pero se ve que me faltaba algo, ahora SI ya quedo andando...aca dejo el codigo fuente para los que esten buscando lo mismo, anda 100 %.

Código (vbnet) [Seleccionar]
Imports System.IO
Imports System.Reflection

Public Class Form1

    Public Sub New()

        ' Llamada necesaria para el Diseñador de Windows Forms.
        InitializeComponent()

        ' Agregue cualquier inicialización después de la llamada a InitializeComponent().
        AddHandler AppDomain.CurrentDomain.AssemblyResolve, AddressOf CargarLibreriaMemoria
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim i As New ClassLibrary1.Class1
        Call i.Saludo()
        i = Nothing
    End Sub

    Private Function CargarLibreriaMemoria(ByVal sender As Object, ByVal args As ResolveEventArgs) As Assembly

        Dim vStream As Stream = Reflection.Assembly.GetExecutingAssembly().GetManifestResourceStream("WindowsApplication1.ClassLibrary1.dll")
        Dim vBuffer As Byte() = New Byte(vStream.Length - 1) {}

        vStream.Read(vBuffer, 0, vBuffer.Length)

        Dim vLibreria As Assembly = Assembly.Load(vBuffer)

        Return vLibreria
    End Function
End Class


obviamente antes hay que agregar la dll como "nuevo elemento existente" y ponerle en las opciones de compilación como "recurso embebido".

saludos y gracias.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

[D4N93R]

Puedes filtrar por el ResolveEventArgs, tiene una propiedad llamada Name, en donde te pide el nombre a resolver, en caso de que ese método se vuelva a llamar en otra oportunidad buscando otro assembly.

Saludos y que bueno que hayas resuelto el problema.

seba123neo

gracias, anda bien , pero el tema es que justo para lo que necesito no anda, o sea el control es un usercontrol, compilado en dll obviamente,proba si queres crear un usercontrol simple con un boton dentro, lo compilas a dll, despues desde otro proyecto agregar como referencia la dll y agregar como recurso como ya dije antes la misma, insertar un usercontrol al formulario, y ahi si que no anda. tira el error de que no se puede cargar el ensamblado o recurso.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

[D4N93R]

Bueno ahora lo pruebo, se me ocurre también que intentes meter ese control en tiempo de ejecución..

Voy a probar eso, pero de todos modos intenta lo que te dije.

Saludos!

seba123neo

me estoy rompiendo el mate, ya vi 20 mil ejemplos, creo que he visto que para cada dll hay que crear un Domain distinto...explico que son 3 dll en total las que necesito cargar, tambien claro que no tengo el codigo de las dll, o sea son dll ya compiladas , son controles de botones , combos..e.tc..los tengo puesto en un formulario a estos controles, el objetivo como explique es solo llevar el .exe , con las dll como recursos incrustados dentro y cargarlas a memoria para que se pueda usar, sino tira el basico error could not load assembly o recurse.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

[D4N93R]

seba,

Bueno, pues a mi me funciona de la siguente manera:

Código (csharp) [Seleccionar]

        static Assembly CurrentDomain_AssemblyResolve(object sender, ResolveEventArgs args)
        {
            Stream s = Assembly.GetExecutingAssembly().GetManifestResourceStream("LoadAssembly.UserControls.dll");
           
            return Assembly.Load(new BinaryReader(s).ReadBytes((int)s.Length));

        }


Es lo mismo que hiciste tú , aunque si tienes varias dll referenciadas tienes que condicionar eso por args.Name que te da el nombre del assembly que te pide.

El Assembly lo referencio y también lo agrego al proyecto como un archivo y lo marco como Embedded Resource en el Build Action.

Un saludo!

seba123neo

estas seguro que la libreria dll es un usercontrol ?? y si esa dll la agregaste a la barra de herramientas y lo has insertado en el formulario ??
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

[D4N93R]

Sip! Ahora mi turno :P

Estás seguro de que estas regresando el assembly correctamente ?

Prueba ponerle esto: (Nota: no se si esté bien, no me acuerdo bien de la sintaxis de VB.Net)

Código (vbnet, 4, 5, 6) [Seleccionar]

Private Function CargarLibreriaMemoria(ByVal sender As Object, ByVal args As ResolveEventArgs) As Assembly

        Dim vStream As Stream = Reflection.Assembly.GetExecutingAssembly().GetManifestResourceStream("WindowsApplication1.ClassLibrary1.dll")
        IF vStream = Null Then
           MessageBox.Show("Ups stream es null")
        End IF
        Dim vBuffer As Byte() = New Byte(vStream.Length - 1) {}

        vStream.Read(vBuffer, 0, vBuffer.Length)

        Dim vLibreria As Assembly = Assembly.Load(vBuffer)

        Return vLibreria
End Function