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
-------------------------------------------------------
Delphi-Quellcode:
was mache ich hier falsch?
var bmp : image;
btmp : bitmap;
pic : array of byte;
ic : imageConverter;
begin
btmp := bitmap.Create('F:\image.gif');
ic := imageConverter.Create;
result := byte(ic.Convertto(bmp, pic.GetType ) );
end
Danke f. die Hilfe
[edit=Luckie]Das nächste mal bitte selber die Delphi-Tags setzen. Danke. Mfg, Luckie[/edit]