iconos TBindNavigator

[juank1971]

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