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

发布网友发布时间：2023-01-06 10:53

共2个回答

热心网友时间：2023-10-18 03:58

procere 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;

热心网友时间：2023-10-18 03:58

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

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com