Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Ayuda!!!Problemas en C++ Builder. Por Favor (https://www.clubdelphi.com/foros/showthread.php?t=77831)

lisette 28-02-2012 21:41:30

Ayuda!!!Problemas en C++ Builder. Por Favor
 
Hola
tengo el siquiente problema:
cree un *.res donde en él tengo dos imagenes.
Se como acceder a ellas dende Borland C++
Este es el codigo de Delphi:


Esto lo que hace es unir todos los recursos de imagenes.res con nuestro
ejecutable. Para cargar la imagen dentro de un objeto TImage se hace lo
siguiente:
procedure TFPrincipal.FormCreate( Sender: TObject );
var
Recursos: TResourceStream;
Imagen: TJPegImage;
begin
Imagen := TJPegImage.Create;
Recursos := TResourceStream.Create( hInstance, '#1', RT_RCDATA );
Recursos.Seek( 0, soFromBeginning );
Imagen.LoadFromStream( Recursos );
Imagen1.Canvas.Draw( 0, 0, Imagen );
Recursos.Free;
Imagen.Free;
end;

ayuda al traducir este codigo o digame uno igual en Borland C++

Casimiro Notevi 28-02-2012 22:33:42

Bienvenida a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración.






.

ecfisa 29-02-2012 06:04:35

Hola lisette.

Probá de este modo:
Código:

...
#include "jpeg.hpp"
#pragma resource "resources.res"


void __fastcall TFPrincipal::FormCreate(TObject *Sender)
{
TResourceStream *Resource = new TResourceStream((int)HInstance, 1, RT_RCDATA);
TJPEGImage *JImage = new TJPEGImage;
  __try {
    JImage->LoadFromStream(Resource);
    Image1->Picture->Graphic = JImage;
  }
  __finally {
    Resource->Free();
    JImage->Free();
  }
}

Saludos.


La franja horaria es GMT +2. Ahora son las 12:53:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi