image in Bytearray umwandeln?

[wabux]

Hallo,

ich möchte ein image in ein array of byte umwandeln nach dieser Vorlage in VB

Private Overloads Function ImageToBytes( ByVal Img As System.Drawing.Image ) As Byte()
' Konvertiert ein Image-Objekt in ein Byte-Array
Dim IC As New ImageConverter
' Mithilfe des ImageConverter-Objekts ein Image
' in ein Byte-Array überführen
ImageToBytes = CType(IC.ConvertTo( Img, GetType(Byte()) ), Byte())
End Function
-------------------------------------------------------

was mache ich hier falsch?


var bmp : image;
pic : array of byte;
ic : imageConverter;
begin
bmp := bitmap.Create('F:\image.gif');
ic := imageConverter.Create;
result := byte(ic.Convertto(bmp, pic.GetType ) );
end



Danke f. die Hilfe

[Luckie]

Argh und in die Internetsparte gehört es auch nicht. Hier: http://www.delphipraxis.net/internal...ct.php?t=57057 geht es weiter. Geschlossen.