我遇到一个奇怪的问题.
我使用Delphi和Indy上传和备份一些文件.它在许多计算机上运行得很好(Win7 64bit,WinXP).CPU使用率低于1%和最大值.RAM为20MB.
但是有一台计算机(Win 2008 R2)存在问题,我无法找到原因.CPU使用率为5-20%,内存需要100MB +,并且增加了很多.此外,"页面错误"上升很多,例如.每秒10万(我的电脑没有增加)
代码很简单
var
IdHTTP: TIdHTTP;
IdPostData: TIdMultiPartFormDataStream;
sResponse: string;
begin
IdHTTP := TIdHTTP.Create(nil);
IdPostData:=TIdMultiPartFormDataStream.Create;
try
IdPostData.AddFile('file', 'C:\data.dat', '');
sResponse:=IdHTTP.Post('http://web.com', IdPostData);
ShowMessage(sResponse);
finally
IdHTTP.Free;
IdPostData.Free;
end;
end;
Run Code Online (Sandbox Code Playgroud)
有没有人知道为什么"页面错误"增加了很多?是否有可能存在硬件问题?怎么找到它?
我正在使用Indy(IdHTTP,OpenSSL).我用这个简单的代码下载页面
var
IdHTTP: TIdHTTP;
begin
IdHTTP:=TIdHTTP.Create;
try
IdHTTP.Get('https://ezfile.ch/?m=help&a=tos');
finally
IdHTTP.Free;
end;
end;
Run Code Online (Sandbox Code Playgroud)
它返回:
EIdOSSLUnderlyingCryptoError exception "Error connecting with SSL.
error:14094438:SSL routines:SSL3_READ_BYTES:tlsv1 alert internal error"
Run Code Online (Sandbox Code Playgroud)
该站点使用TLS 1.1,AES_128_CBC_SHA1,ECDHE-ECDSA.它应该很容易重现.
尝试了各种Delphi版本,Indy 10.6.2,各种OpenSSL版本.更改SSLVersion选项没有帮助.
可能是什么问题呢?