图片如何转换成代码

2024-12-28 百科 86阅读 投稿:铭记

1.图片如何转换成代码

使用数据流的形式输出图片;

参考实例如下:

{*

MakeHtml('test.jpg', 'test.html');

@param imgsrc 图片路径

@param savefile 生成的html文件名

@return 保存成功返回true

}

function MakeHtml(const imgsrc,savefile: string): Boolean;

var

f: TStringList;

begin

Result := True;

f := TStringList.Create;

try

f.Add('<IMG SRC="' + imgsrc + '" />');

try

f.SaveToFile(savefile);

except

Result := False;

end;

finally

f.Free;

end;

声明:沿途百知所有(内容)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系我们将尽快删除