Ver Mensaje Individual
  #4  
Antiguo 09-03-2022
juank1971 juank1971 is offline
Miembro
 
Registrado: feb 2008
Posts: 230
Reputación: 17
juank1971 Va por buen camino
bueno para ahorarles tiempo creo que tengo la manera en un fichero de recursos o mejor dicho para no complicar las cosas como todos los delphianos en un notepat puse este codigo y lo renombre a .rc.
dentro puse esta linea y lo llame Recursos.rc

RES_IMG_OK_16X RCDATA "btn_16_ok.png"


y en la misma carpeta del proyecto puse la inagen png llamada btn_16_ok.png




luego abri una ventana msdos y puse brcc32.exe Recursos.rc y este programa que esta dentro del delphi me crea el fichero de recursos Recursos.RES

para usar este fichero dentro del proyecto pongo esta directiva de compilacion para que ekl compilador sepa usar el recurso

Código Delphi [-]


  {$R Recursos.res}


Luego puse en el mismo create este fragmento de codigo para poder usar la imagen que esta dentro del recurso y cargarla a un Timage



Código Delphi [-]


var
  B: TBitmap;
  RS: TResourceStream;
begin
  RS := TResourceStream.Create(HInstance, 'RES_IMG_OK_16X', RT_RCDATA);
  try
    B := TBitmap.Create;
    B.LoadFromStream(RS);
    Image1.Bitmap := B;
  finally
    RS.Free;
  end;


Y listo ya puedo usar imagenes dentro de un fichero de recursos que no esta dentro del proyecto. creo que con esto resuelvo
Responder Con Cita