Como cargar imagenes PNG desde los recursos de mi App hacia un TImage?
 

Hola a todos los friends del foro, bueno creo que el título de este hilo resume totalmente mi pregunta. :confused:
Uso Delphi 2010 y los recursos los agrego... Project -> Resources "Add" (Son imagenes en formato PNG :D).

Gracias por sus aportes.

Hola yn4v4s.

Revisa este enlace : Una ayuda con Imágenes PNG, aunque, tratándose de un TImage, tendrías que hacer unos pequeños cambios:

Código Delphi [-]
...
implementation
{$R imagen.res} // archivo de recurso

uses PngImage;  

procedure LoadPngFromResource(const ResName: TFileName; const Index: Integer; BM: TBitmap);
var
  RE : TResourceStream;
begin
  with TPngObject.Create do
  try
    RE  := TResourceStream.Create(hInstance, '#'+ IntToStr(Index), RT_RCDATA);
    try
      RE.Seek(0, soFromBeginning);
      LoadFromStream(RE);
      AssignTo(BM);
    finally
      RE.Free;
    end;
  finally
    Free;
  end;
end;

// Ejemplo de uso
procedure TForm1.Button1Click(Sender: TObject);
begin
  LoadPngFromResource('IMAGEN.RES', 1, Image1.Picture.Bitmap);
end;

Saludos :)