Código de Delphi - Cargar un bitmap

Cargar un bitmapgráfica de visualizaciones


Delphi

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 12 de Junio del 2003 por Esteban
9.666 visualizaciones desde el 12 de Junio del 2003. Una media de 14 por semana
Código que nos muestra como cargar una imagen bitmap, en un formulario, mediante código.

Versión 1
estrellaestrellaestrellaestrellaestrella(1)

Publicado el 12 de Junio del 2003gráfica de visualizaciones de la versión: Versión 1
9.667 visualizaciones desde el 12 de Junio del 2003. Una media de 14 por semana
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

Si alguno de los archivos de descarga no funciona, comentanos aquí el error.




Comentarios sobre la versión: Versión 1 (1)

Fabian
16 de Julio del 2004
estrellaestrellaestrellaestrellaestrella
Aunque el uso de la Api es eficiente y rapido, podrias usar las capacidade propias de delphi y hacerte la vida mas sencilla, reemplazando el codigo que tienes por este que envio, el resultado es el mismo, el codigo mas sencillo, y puedes incluso cargar la imagen de un recurso.

procedure TForm1.FormResize(Sender: TObject);
Var
Mi_Img : TBitMap;
begin
Mi_Img := TBitMap.Create;
try
Mi_Img.LoadFromFile('bitMap.bmp'); //Archivo
//Mi_Img.LoadFromResourceName(Handle, 'MI_IMAGEN'); //Recurso
Canvas.Draw(1,1, Mi_Img);
finally
Mi_Img.Free;
end;

end;
Responder

Comentar la versión: Versión 1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios

http://lwp-l.com/s671