Äm, ahso, die function erwartet bei data nur einen zeiger auf die daten! Dann ist klar warum meine bmpausfirmware function nicht läuft... nur wie bekomme ich denn einen zeiger auf das ausgelesene bytearray?
Delphi-Quellcode:
function TForm1.bmpausfirmware(offset,groesse:integer):TBitmap;
VAR i:integer; buf: array of byte; ergebniss:string;
begin
cla := TFileStream.Create(pfad, fmOpenread);
cla.Position:=offset;
SetLength(buf, groesse);
cla.Read(buf[0], groesse);
ergebniss:='';
for i:=0 to groesse do
ergebniss:=ergebniss + inttostr(buf[0]);
i:=strtoint(ergebniss);
result:=Bmp18ToBmp24(i,176,220);
end;
Also eigentlich komme ich mit delphi ganz gut klar, nur mit zeigern steh ich auf kriegsfuß...