소스 검색

* Add content to download anchor

Michaël Van Canneyt 1 년 전
부모
커밋
dc418b3fea
1개의 변경된 파일1개의 추가작업 그리고 0개의 파일을 삭제
  1. 1 0
      packages/zenfs/zenfsutils.pas

+ 1 - 0
packages/zenfs/zenfsutils.pas

@@ -749,6 +749,7 @@ Function CreateDownLoadFromFile(const aFileName,aMimeType : string; aParent : TJ
 
 begin
   Result:=TJSHTMLAnchorElement(Document.createElement('a'));
+  Result.AppendChild(aLinkContent);
   Result.href:=CreateDataURL(aFileName,aMimetype);
   Result.Download:=ExtractFileName(aFileName);
   aParent.AppendChild(Result);