Ver Mensaje Individual
  #2  
Antiguo 06-09-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Prueba con esto:

Código Delphi [-]
uses Jpeg;

var
  Resource: TResourceStream;
  Jpg: TJpegImage;
begin
  Resource:= TResourceStream.Create(0,'NOMBRE',RT_RCDATA);
  Jpg:= TJpegImage.Create;
  try
    Jpg.LoadFromStream(Resource);
    // Aqui cargamos el jpg en un TImage
    Image1.Picture.Assign(Jpg);
  finally
    Jpg.Free;
    Resource.Free;
  end;
end;
Responder Con Cita