onlyou13

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
上一页 1 ··· 3 4 5 6 7 8 9 10 11 下一页

2019年7月3日

摘要: Nginx配置 # HTTPS server { listen 443 ssl; server_name kvaccount.xx.io; ssl_certificate "C:/xx/conf/ssl/xx.crt"; ssl_certificate_key "C:/xx/conf/ssl/xx. 阅读全文
posted @ 2019-07-03 15:45 onlyou13 阅读(722) 评论(0) 推荐(0)

2019年6月3日

摘要: unit uHanzi; interface uses Winapi.Windows, System.SysUtils; const //3500个一级汉字 {$REGION '3500个一级汉字'} HanziLevel1 = '一乙二十丁厂七卜八人入儿匕几九刁了刀力乃又三干于亏工土士才下寸大丈与万上小口山巾'+ '千乞川亿个夕久么勺凡丸及广亡门丫义之尸己... 阅读全文
posted @ 2019-06-03 14:18 onlyou13 阅读(1475) 评论(0) 推荐(0)

2019年6月2日

摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; const MW_MYMSG = WM_USER + 1; type TFormFF = class(TForm) Edit... 阅读全文
posted @ 2019-06-02 10:06 onlyou13 阅读(671) 评论(0) 推荐(0)

2019年5月8日

摘要: 测试: 函数代码: 测试代码: 阅读全文
posted @ 2019-05-08 10:33 onlyou13 阅读(137) 评论(0) 推荐(0)

2019年4月22日

摘要: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文
posted @ 2019-04-22 14:11 onlyou13 阅读(320) 评论(0) 推荐(0)

2019年3月17日

摘要: procedure TForm1.FormCreate(Sender: TObject); begin try IdSMTP1.AuthenticationType := atLogin; IdSMTP1.Host := 'smtp.qq.com'; IdSMTP1.Username := 'tes 阅读全文
posted @ 2019-03-17 11:46 onlyou13 阅读(963) 评论(0) 推荐(0)

2019年3月4日

摘要: 本人以x64 VC14编译版本为例, Windows版本: Window Server 2008 R2 x64 Python: 3.7.2 x64 1. 首先安装Python环境,安装python3.7.2 x64版本 下载地址:https://www.python.org/ftp/python/3 阅读全文
posted @ 2019-03-04 21:56 onlyou13 阅读(1719) 评论(0) 推荐(0)

2019年1月23日

摘要: var mStream: TMemoryStream; vcode: array[0..49] of AnsiChar; buffer: array of AnsiChar; begin mStream := TMemoryStream.Create; mStream.LoadFromFile('1.png'); //GetMem(vcode, 50); ShowM... 阅读全文
posted @ 2019-01-23 20:45 onlyou13 阅读(229) 评论(0) 推荐(0)

2018年12月20日

摘要: 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 阅读(400) 评论(0) 推荐(0)

2018年12月14日

摘要: 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 阅读(137) 评论(0) 推荐(0)

上一页 1 ··· 3 4 5 6 7 8 9 10 11 下一页