摘要：function GetPJData(APage: Integer): string; var IdHTTP: TIdHTTP; url: string; paramsList: TStringList; StrStream: TStringStream; const C_URL = 'https://www.tcpjw.com/OrderList/TradingCenter... 阅读全文

摘要：function DecodePJItem(sText: string): TList; var reg: TRegEx; mc: TMatchCollection; item: TMatch; dataItem: TDataItem; begin Result := TList.Create; sText := reg.Replace(sText, '\n', '');... 阅读全文