有没有人能帮帮我 5555

2021-04-17 03:16:17 3.2k 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

小桂叶墨衍会员 · AI 创作全网分发关注 + 加入社区

大麦网抢票软件工具开发系列（一）前言《大麦网》都知道吧，就是那个被网友声称“大麦网你卖啥了?”票务平台。近期有听到朋友说《大麦网》的票很难抢，基本上都是说：“哎哟喂,被挤爆啦,请稍后重试!”，也不知道《大麦网》... 阅读详情

最近要调用一个接口原本是很简单的但是他们的站点只支持 tlsv1.3的 delphi有什么方法能够调用这种接口吗？谢谢大家

...全文

数字后端流程--place Floorplan完成后芯片的大致框架已经出现，万里长征已经迈出特别重要的第一步了，前面的步骤我们已经完成了io port，macro的摆放，现在core外只剩下std cell（标准单元)了，Place这一步就是要把std cell放进core里。看到密密麻麻的std cell也不用紧张，因为放std cell不用像macro手动一个一个摆，工具就可以帮我们完成大部分工作。虽然这一步的工作只有一个，但也不是只要Place完就能进行下一步的，衡量Place质量是否满足标准会通过以下几点判断。阅读详情

小桂叶

Windows SDK/API 1,184 成员 22,326 内容

+ 关注 + 加入社区

切换为时间正序

天行归来 2021-04-25

打赏
举报

引用 9 楼小桂叶的回复:

[quote=引用 8 楼天行归来的回复:][quote=引用 7 楼小桂叶的回复:][quote=引用 6 楼天行归来的回复:]Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

引用 6 楼天行归来的回复:

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

你好我问一下我在32位的系统里使用时报系统错误 -2146697208 是因为版本太低吗？[/quote] Delphi哪个版本的？[/quote] DELPHI 10编译的动态库在delphi6里调用的在我自己的电脑上（win7）运行没有问题但是放到32位xp的电脑上就会报系统错误， 32位的电脑的ie打不开我调用的网站（tls1.3）是这个电脑版本太低了吗？如果想运行的话只有升级ie吗？[/quote] 这个倒是没有研究，可以试下xp环境下，浏览器访问你的网站是否正常，另外，看下 libeay32.dll 和 ssleay32.dll 不同电脑版本是否有什么差异，找下最新32位放到xp环境下看是否正常。

小桂叶 2021-04-25

打赏
举报

引用 8 楼天行归来的回复:

[quote=引用 7 楼小桂叶的回复:][quote=引用 6 楼天行归来的回复:]Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

引用 6 楼天行归来的回复:

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

小桂叶 2021-04-22

打赏
举报

引用 6 楼天行归来的回复:

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

引用 6 楼天行归来的回复:

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

你好我问一下我在32位的系统里使用时报系统错误 -2146697208 是因为版本太低吗？

天行归来 2021-04-22

打赏
举报

引用 7 楼小桂叶的回复:

[quote=引用 6 楼天行归来的回复:]Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

引用 6 楼天行归来的回复:

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。
var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;

你好我问一下我在32位的系统里使用时报系统错误 -2146697208 是因为版本太低吗？[/quote] Delphi哪个版本的？

天行归来 2021-04-18

打赏
举报

Delphi10环境，用 IXMLHTTPRequest ，测试 https://halfrost.com/tls1-3_start/ 这个网站，可正常返回。


var
  resp: string;
  http: IXMLHTTPRequest ;
begin
  http:= CoXMLHTTP60.Create();
  http.open('Get', 'https://halfrost.com/tls1-3_start/', false, EmptyParam, EmptyParam);
  http.send(EmptyParam);
  resp := http.responseText;
end;