通过isapi datasnap https缓慢Delphi文件流

Question

我编写了一个datasnap ISAPI应用程序。我正在使用流将文件从客户端发送到服务器。问题是它只需1分钟即可发送3 MB的zip文件。

我在客户端的代码看起来像这样

import serial
ser = serial.Serial(port = "/dev/USBNAME", baudrate=9600)
ser.close()
ser.open()
if ser.isOpen(): 
     ser.write("test")

在客户端我也尝试了这个

TBlobField(ClientDataSetTemp.FieldByName('FileData')).LoadFromFile('c:\test.zip');
ClientDataSetTemp.SaveToStream(MemoryStreamFileData);

我的服务器代码看起来像这样

MemoryStreamFileData:= TFileStream.Create('c:\test.zip', fmShareDenyWrite);

知道如何提高速度。谢谢。

Answer 1

TBlobField使用ActiveX PBlobObject继承自Windows OLE BLOB。

几乎出现问题，只需检查＆＃34; https://msdn.microsoft.com/en-us/library/windows/desktop/ms711511%28v=vs.85%29.aspx＆＃34;

使用sql saveto文件函数可以快速解决问题。

  

Exporting Blob from MySQL database to file with only SQL