Delphi 使用PdfiumLib 显示pdf流文件
PdfiumLib
Example of a PDF VCL Control using PDFium
添加链接描述
例子可以直接用,上代码
uses
PdfiumCore,PdfiumCtrl,PdfiumLib
private
FCtrl: TPdfControl;
procedure ListAttachments;
public
{ Public declarations }
end;
procedure TFrm_download_jsd.btn1Click(Sender: TObject);
var
stream:TFileStream;
F :TMemoryStream;
begin
inherited;
//另存为
F := TMemoryStream.Create;
try
F.Position:=0;
F:=//自己的赋值
// if (savedialog1.Execute) then
// F.SaveToFile(savedialog1.filename);
FCtrl.LoadFromActiveStream(F,'');//这个是关键
finally
FreeAndNil(F);
end;
end;