摘要：
function UnicodeToChinese(inputstr: string): string; var i: Integer; index: Integer; temp, top, last: string; begin index := 1; while index >= 0 do begin ... 阅读全文
2018年6月8日
摘要：
Delphi IDHTTP控件：GET/POST 请求 最近一直在使用IDHTTP，下面是一些关于 GET、POST 请求基本使用方法的代码 一、GET 请求 1 procedure GetDemo; 2 var 3 IdHttp : TIdHTTP; 4 Url : string;//请求地址 5 阅读全文
摘要：
Delphi XE10，Json 生成和解析，再利用indyhttp控件Post 2017年09月20日 18:30:23 阅读数：1973 --不多说，直接上代码 procedure TFrmMain.Brand; var JSONObject, jsonparam: TJSONObject; // JSON类 jsonArray: TJSONArray; // JSON数组变量 ... 阅读全文
摘要：
从国外网站抄来的代码 Delphi source: http := TIdHttp.Create(nil);http.HandleRedirects := True;//允许头转向http.ReadTimeout := 5000;//请求超时设置http.Request.ContentType := 阅读全文