uniGUI之文件下载(29)

1]SendFile

UniSession.SendFile('新建文本文档.txt'  //服务器端  文件名

                   ,'anew.txt'          //客户端 新下载 的文件名

                   );

2]SendStream

procedure TMainForm.UniButton3Click(Sender: TObject);

var

  S : TStringStream;

begin

  S:=TStringStream.Create('Some text here....');

  try

    UniSession.SendStream(S, 'Mydoc.txt');

  finally

    S.Free;

  end;

end;

3]自定义类型文件下载

UniSession.SendFile(ServerModule.UniServerModule.FilesFolderPath+'aaa.abc');

web默认文档主目录在执行程序同级目录下的files子目录下,该属性可以在ServerModule的FilesFolder属性中配置。

对于常见的文档类型，浏览器默认支持，对于如abc扩展名的特殊类文档，点击后浏览器会没有动作，你需要配置一下MIME表。

在ServerModule的OnCreate属性中添加：

MimeTable.AddMimeType("abc","abc");

巴特西

uniGUI之文件下载(29)

最新文章

热门文章