onlyou13

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
  85 随笔 :: 22 文章 :: 0 评论 :: 41005 阅读

12 2018 档案

GetPJData - uGetHttpData.pas
摘要：function GetPJData(APage: Integer): string; var IdHTTP: TIdHTTP; url: string; paramsList: TStringList; StrStream: TStringStream; const C_URL = 'https://www.tcpjw.com/OrderList/TradingCenter... 阅读全文
posted @ 2018-12-20 20:22 onlyou13 阅读(395) 评论(0) 推荐(0) 编辑

update20181214 - uGetHttpData.pas
摘要：function DecodePJItem(sText: string): TList; var reg: TRegEx; mc: TMatchCollection; item: TMatch; dataItem: TDataItem; begin Result := TList.Create; sText := reg.Replace(sText, '\n', '');... 阅读全文
posted @ 2018-12-14 15:17 onlyou13 阅读(131) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示