| Pregunta: | 50201 - CREAR UNA DLL DE IMAGENES |
| Autor: | Jose Guillen |
| Como se puede crear una libreria (DLL) que contenga imagenes (algo parecido a los archivos de Recursos de VB) no solo con formato BMP y una vez creada poder verlas desde un ejecutable ya que asi se reduce el tamaño del archivo EXE. | |
| Respuesta: | Jose Guillen |
| Bueno creo que por fin he dado con una solución (aunque es posible que no sea la correcta), se trata de coger las imagenes de la Dll atraves del portapapeles. Los pasos a seguir son: Crear un proyecto Dll en el cual añadimos un Form con tantos PictureBos como imagenes queramos tener, por lo que creamos una matriz de PictureBox. En un módulo de clase ponemos: Public Function Imagen(Datos As Integer) Clipboard.Clear Clipboard.SetData Form1.Picture1(Datos).Picture End Function Creamos la Dll. A continuación creamos un Nuevo Proyecto EXE estandar: Añadimos en el Form un PictureBox y un TextBox el siguiente código: Dim res As Integer Private Sub Form_Click() Const CF_BITMAP = 2 On Error Resume Next res = Val(Text1.Text) Imagen (res) Picture2.AutoSize = True Picture2.Picture = Clipboard.GetData() Clipboard.Clear End Sub Añadimos al proyecto la libreria creada en proyecto/Referencias... Cuando ejecutamos con F5 introducimos el el TextBox el número de la imágen que queramos ver y pulsamos sobre el Form. Y esto es todo amigos. | |