cómo añadir recursos y usarlos

Question

En mi solicitud Quiero añadir 2 imágenes como recursos

quiero usar esas imágenes, cuando hago clic en el botón Sí en mi solicitud primera imagen se establece como fondo de pantalla y cuando hago clic en el botón No en mi segunda imagen solicitud será establecer como fondo de escritorio

gracias de antemano

respecto

Answer 1

La forma más fácil es crear un archivo de texto y el nombre de resources.rc o algo (siempre y cuando no sea el mismo nombre s su archivo de proyecto porque ya tiene un archivo de recursos propio).

Si va a añadir imágenes, tendrá que añadir líneas tales como:

IMG_1 BITMAP "c:\my files\image1.bmp" 
IMG_2 RCDATA "c:\my files\image2.jpg" 

Tenga en cuenta que el primer parámetro es un nombre único recurso de identificación. El segundo parámetro es el tipo de recurso. Algunas constantes están disponibles, como BITMAP y AVI. Para otros, use RCDATA. El tercer parámetro es la ruta completa y el nombre de archivo del recurso.

Ahora, en Delphi, puede agregar este archivo .rc a su proyecto en el administrador de proyectos.

Para usar los recursos, necesita diferentes métodos de acuerdo con el tipo de recurso.

Para cargar un mapa de bits, puede utilizar:

imgWallpaper1.Picture.Bitmap.LoadFromResourceName(HInstance, 'IMG_1');

Para cargar un archivo JPEG, es necesario convertir de esta manera:

var 
    jpgLogo: TJpegImage; 
    RStream: TResourceStream; 
begin 
    RStream := TResourceStream.Create(HInstance, 'IMG_2', RT_RCDATA); 
    Try 
     jpgLogo := TJpegImage.Create; 
     Try 
      jpgLogo.LoadFromStream(RStream); 
      imgLogo.Picture.Graphic := jpgLogo; 
     Finally 
      jpgLogo.Free; 
     End; 
    Finally 
     RStream.Free; 
    End; {Try..Finally}