Vampyre Imaging Library

[mrnovice]

Hola, me preguntaba si alguno de ustedes ah podido mostrar de manera directa una imagen en un Timage con el uso de este componente

trate un codigo similar a este

Código Delphi [-]
var img:TimageData
 initImage(img)
 imaging.loadfilefrom('x:\y.bmp',img)
 Imaging.rotate(img,90);

Como podria yo asignar esto a un bitmap, o mandarlo a un Timage? gracias , hay disculpen tantos posts, nose si sea mucha molestia

[Neeruu]

Hola como estas?
Para cargar una imagen en un TImage puedes hacerlo asi

Suponiendo que sea el evento Click de un TButton llamano btCargarImagen

Código Delphi [-]
procedure TForm1.btCargarImagenClick(Sender: TObject);
// si no tienes el timage en el formulario lo defino aca
var MyTImage :TImage;
// defino un Bitmap
MyBiTMap :TBitMap;
begin
  // si tienes el TImage en el formulario lo cargas asi
  // donde 'MyImage' es el TImage;
   MyImage.Picture.LoadFromFile('C:\MiImagen.Bmp');
  
  // si lo quieres crear en tienpo de ejecucion lo haces asi 
  //Creo el TImage que defini
  MyTImage := TImage.Create(Self);
  //aca asigno todas las propiedades al TImage que cree
  //y luego cargo la imagen
  MyTImage.Picture.LoadFromFile('C:\MiImagen.Bmp');
 
  //Tambien puedo cragar un Bitmap de esta forma;
  //creo el Bitmap que defini
  MyBiTMap := TBitMap.create;
  MyBiTMap.LoadFromFile('C:\MiImagen.Bmp');
  //y luego lo asigamos al TImage
 
  MyImage.Picture.BitMap := MyBitMap //MyImage o MyTImage dependiendo
 
end;

Saluda Atte Neeruu

[mrnovice]

Gracias por el tiempo, me referìa usando el VCL , ya lo soulucioné, el problema es cuando quiero asignar a un bitmap(o crearlo) desde el Timage, creo se llama en tiempo de ejecuciòn, o no existe tal cosa?...mmmm..elódigo cómo lo solucione lo paso cuando llegue a la casa jeje lo olvidé emmm no se si tengan un tutorial para saber más sobre el uso de los bitmap, gracias nuevamente.