可视化 告生成器FastReport VCL功能指南：从Delphi / C ++ Builder / Lazarus保存图像

我们先来看看有哪些光栅图像格式。

BMP

首先，你应该知道，由于BMP是一个老的图像格式，它不是很流行的互联 用户，只有位图图像保存在这种格式不支持向量。

JPEG

尽管存在这些缺点，但该格式仍被认为是Internet上最受欢迎的格式，并且人们经常使用它。

TIFF

这是一种众所周知的栅格格式，几乎支持所有已知的色彩空间。未经压缩的图像几乎已成为印刷行业的标准。有多种压缩算法，甚至有或没有损失。TIFF文件可以包含以索引颜色模式以及灰度存储在CMYK，RGB，Lab颜色模型中的图像。这允许使用这种格式来存储各种图像，用于准备Web图形和版式。除图像本身外，TIFF还包含透明通道，通过它们可以保存图像的透明区域或在工作会话之间突出显示对象。

TIFF格式的另一个功能是能够将多个具有各自属性和属性（标签）的图像保存在一个文件中。尽管TIFF没有创建动画图像的功能，但这使其类似于GIF。这种格式的普及使得在程序和硬件平台之间轻松传输图像成为可能。

GIF

GIF文件尺寸较小，并且支持简单的动画，即在一个文件中更改帧。

GIF格式广泛用于创建横幅以及视频内容的图形外壳。主要优点是数据压缩在多达256色的深度处不会明显损失质量。动画图像包括许多静态帧以及有关帧演示所需时间的数据。

人们在许多领域中使用GIF格式。例如，在其 站的设计中，在 交 络上以广告标语，用于存储照片等形式在撰写文章或书籍时进行 页设计，图形设计。使用这种格式，您可以减小图像的大小，这会积极影响Internet 站页面的加载速度。

SVG

现在我们知道什么时候使用哪种格式更好。

如何从Delphi / Lazarus应用程序导出为这些格式/strong>

首先，我们必须创建一个文档。

然后，在我们创建了想要变成插图的对象之后，启动并查看。

在预览窗口中，我们选择保存 告的格式。例如，我们需要导出到BMP图像。选择并单击。

将出现导出设置窗口。配置并保存。

如何直接从Delphi / C ++ Builder / Lazarus代码中保存BPM / JPEG / TIFF / GIF/strong>

保存为BMP

procedure TForm1.Button1Click(Sender: TObject);begin {Generate a report. The report must be generated before exporting} frxReport1.PrepareReport(); {Set the range of pages to export. By default, all pages of the generated report are exported} frxBMPExport1.PageNumbers := '2-3'; {Set whether to export each page to a separate file.} {.N will be added to the file name, where N is the serial number of the page} frxBMPExport1.SeparateFiles := True; {Set whether to export to monochrome image} frxBMPExport1.Monochrome := False; {Set whether to crop empty edges (page margins)} frxBMPExport1.CropImages := False; {Set the resolution, DPI} frxBMPExport1.Resolution := 96; {Set whether to open the resulting file after export} frxBMPExport1.OpenAfterExport := False; {Set whether to display export progress (show which page is currently being exported)} frxBMPExport1.ShowProgress := False; {Set whether to display the export filter dialog box} frxBMPExport1.ShowDialog := False; {Set the name of the resulting file.} {Please note that if you do not set the file name and disable the export filter dialog box,} {the file name selection dialog will still be displayed} frxBMPExport1.FileName := 'C:Outputtest.bmp'; {Export the report} frxReport1.Export(frxBMPExport1);end;

保存为JPEG

procedure TForm1.Button2Click(Sender: TObject);begin {Generate a report. The report must be generated before exporting} frxReport1.PrepareReport(); {Set the range of pages to export. By default, all pages of the generated report are exported} frxJPEGExport1.PageNumbers := '2-3'; {Set whether to export each page to a separate file.} {.N will be added to the file name, where N is the serial number of the page} frxJPEGExport1.SeparateFiles := True; {Set whether to export to monochrome image} frxJPEGExport1.Monochrome := False; {Set whether to crop empty edges (page margins)} frxJPEGExport1.CropImages := False; {Set the quality of JPEG} frxJPEGExport1.JPEGQuality := 90; {Set the resolution, DPI} frxJPEGExport1.Resolution := 96; {Set whether to open the resulting file after export} frxJPEGExport1.OpenAfterExport := False; {Set whether to display export progress (show which page is currently being exported)} frxJPEGExport1.ShowProgress := False; {Set whether to display the export filter dialog box} frxJPEGExport1.ShowDialog := False; {Set the name of the resulting file.} {Please note that if you do not set the file name and disable the export filter dialog box,} {the file name selection dialog will still be displayed} frxJPEGExport1.FileName := 'C:Outputtest.jpg'; {Export the report} frxReport1.Export(frxJPEGExport1);end;

保存为TIFF

procedure TForm1.Button3Click(Sender: TObject);begin {Generate a report. The report must be generated before exporting} frxReport1.PrepareReport(); {Set the range of pages to export. By default, all pages of the generated report are exported} frxTIFFExport1.PageNumbers := '2-3'; {Set whether to export each page to a separate file.} {.N will be added to the file name, where N is the serial number of the page} frxTIFFExport1.SeparateFiles := True; {Set whether to export to monochrome image} frxTIFFExport1.Monochrome := False; {Set whether to crop empty edges (page margins)} frxTIFFExport1.CropImages := False; {Set the resolution, DPI} frxTIFFExport1.Resolution := 96; {Set whether to open the resulting file after export} frxTIFFExport1.OpenAfterExport := False; {Set whether to display export progress (show which page is currently being exported)} frxTIFFExport1.ShowProgress := False; {Set whether to display the export filter dialog box} frxTIFFExport1.ShowDialog := False; {Set the name of the resulting file.} {Please note that if you do not set the file name and disable the export filter dialog box,} {the file name selection dialog will still be displayed} frxTIFFExport1.FileName := 'C:Outputtest.tif'; {Export the report} frxReport1.Export(frxTIFFExport1);end;

保存为GIF

procedure TForm1.Button4Click(Sender: TObject);begin {Generate a report. The report must be generated before exporting} frxReport1.PrepareReport(); {Set the range of pages to export. By default, all pages of the generated report are exported} frxGIFExport1.PageNumbers := '2-3'; {Set whether to export each page to a separate file.} {.N will be added to the file name, where N is the serial number of the page} frxGIFExport1.SeparateFiles := True; {Set whether to export to monochrome image} frxGIFExport1.Monochrome := False; {Set whether to crop empty edges (page margins)} frxGIFExport1.CropImages := False; {Set the resolution, DPI} frxGIFExport1.Resolution := 96; {Set whether to open the resulting file after export} frxGIFExport1.OpenAfterExport := False; {Set whether to display export progress (show which page is currently being exported)} frxGIFExport1.ShowProgress := False; {Set whether to display the export filter dialog box} frxGIFExport1.ShowDialog := False; {Set the name of the resulting file.} {Please note that if you do not set the file name and disable the export filter dialog box,} {the file name selection dialog will still be displayed} frxGIFExport1.FileName := 'C:Outputtest.gif'; {Export the report} frxReport1.Export(frxGIFExport1);end;

Fastreport在线下单立享85折起！赶紧加入购物清单吧！

还想要更多吗可以点击阅读【FastReport 表2020最新资源盘点】，查找需要的教程资源。如果您有任何疑问或需求，请随时加入FastReport技术交流群（），我们很高兴为您提供查询和咨询。

标签：