Delphi如何把BMP图像当成流式文件读取把bmp的头去掉

只要bmp的象素点信息, 最后存为.txt 文件就是把bmp文件头的前64个字节去掉,另保存
2026年09月26日 14:45
有2个网友回答
网友(1):

procedure TForm1.Button2Click(Sender: TObject);
var
MS:TMemoryStream;
SL:TStringList;
S:String;
begin
MS:=TMemoryStream.Create;
SL:=TStringList.Create;
try
MS.LoadFromFile('c:\test.bmp');
Ms.Position:=64;
SetLength(S,Ms.size-64);
MS.ReadBuffer(PChar(S)^,MS.Size-64);
SL.Text := S;
SL.SaveToFile('c:\test.txt');
finally
SL.Free;
MS.Free;
end;
end;

网友(2):

????????????????????不明白