10 2022 档案

QDAC使用记录-QJson

摘要：一：数组创建 var FJson := TQJson.Create; try with FJson.AddArray('Arr') do begin for i := 0 to 1 do begin with add do begin Add('User').AsInteger := i; Add( 阅读全文

posted @ 2022-10-18 10:10 Yang杨。阅读(183) 评论(0) 推荐(0) 编辑

QDAC使用记录-QLog

摘要：一：日志发送到远程syslog服务器： var AWriter := TQLogSocketWriter.Create; AWriter.ServerHost := 127.0.0.1;//远程服务器地址 AWriter.ServerPort := 514; //远程服务器端口 AWriter.U 阅读全文

posted @ 2022-10-18 09:48 Yang杨。阅读(179) 评论(0) 推荐(0) 编辑

TidHttp接收非200响应错误返回值

摘要：TidHttp控件默认只能接收状态码200的成功响应，其余状态码，比如404，400..等会直接抛出异常，下面两个方法可以获取非200响应值的返回值数据一：直接勾选Tidhttp控件这两个属性，此时获取到的返回值即为正常返回数据二：将Post或者Get使用try except end包裹，获阅读全文

posted @ 2022-10-10 16:17 Yang杨。阅读(83) 评论(0) 推荐(0) 编辑