delphi 用流文件读取bmp到数组后,怎么把数组的值打印出来?
bgr : array of byte;
ms:TMemoryStream;
ms:=TMemoryStream.Create;
ms.LoadFromFile('h:\delphi\9.bmp');
ms.Position:=0;
setLength(bgr, ms.size);
ms.ReadBuffer(bgr[0], ms.size);
//这里为止把(。bmp读到bgr数组了。
怎么把bgr在memo里显示出来?
或者是保存为txt文件?
[解决办法]
要显示成什么?? 像用记事本打开bmp文件那样,在记事本里看到的东西?
[解决办法]
将数据中的每个数据用IntToStr()进行转化,然后再输出。
[解决办法]
var
I: integer;
begin
for I := 0 to length(arr) -1 do
Memo1.Line.Add(IntToStr(arr[I]));
end;