Ver Mensaje Individual
  #1  
Antiguo 30-01-2009
fredycc fredycc is offline
Miembro
 
Registrado: nov 2008
Posts: 18
Reputación: 0
fredycc Va por buen camino
Cómo crear un arreglo de bytes apartir de una imagen?

Hola, quisiera saber si en Delphi es posible crear un arreglo de bytes a partir de un archivo de imagen ; en Visual lo he visto así:

Dim
fs As FileStream = New FileStream(filePath, FileMode.Open, FileAccess.Read)
Dim br As BinaryReader = New BinaryReader(fs)
Dim bm() AsByte = br.ReadBytes(fs.Length)
br.Close()
fs.Close()
Dim photo() AsByte = bm

Les agradecería su apoyo.
Responder Con Cita