onlyou13

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2019年11月6日

摘要: 两个方法 调用方式: 阅读全文
posted @ 2019-11-06 16:28 onlyou13 阅读(146) 评论(0) 推荐(0) 编辑

2019年11月5日

摘要: Build.bat @echo off @echo delphi x64编译测试 @cd /d %~dp0 @echo 设置Delphi参数信息 @set SourcePath=%~dp0.\src @set BinPath=%~dp0Bin @echo 编译delphi x64 if exist 阅读全文
posted @ 2019-11-05 12:18 onlyou13 阅读(788) 评论(0) 推荐(0) 编辑

2019年10月30日

摘要: 这是修正+取MD5的方法 这是批量修正PNG的代码,pas + dfm uFixpng.dfm 阅读全文
posted @ 2019-10-30 14:41 onlyou13 阅读(145) 评论(0) 推荐(0) 编辑

2019年10月29日

摘要: unit uMD5; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics; type MD5Count = array[0..1] of DWORD; MD5State = array[0..3] of DWORD; MD5Block = array[0..15] of DWORD; MD5CBits = 阅读全文
posted @ 2019-10-29 23:23 onlyou13 阅读(135) 评论(0) 推荐(0) 编辑

2019年10月19日

摘要: procedure CloseSleepAndDisplayOn; begin ShellExecute(0, 'open', 'cmd.exe', '/c powercfg /x /monitor-timeout-ac 0', nil, SW_HIDE); ShellExecute(0, 'open', 'cmd.exe', '/c powercfg /x /monitor-timeo... 阅读全文
posted @ 2019-10-19 18:51 onlyou13 阅读(202) 评论(0) 推荐(0) 编辑

2019年9月27日

摘要: dll代码: mydll.dpr delphi调用: 阅读全文
posted @ 2019-09-27 11:10 onlyou13 阅读(258) 评论(0) 推荐(0) 编辑

2019年9月3日

摘要: uSafePublic.pas 调用函数: 阅读全文
posted @ 2019-09-03 22:04 onlyou13 阅读(314) 评论(0) 推荐(0) 编辑

2019年9月2日

摘要: function GetNumberBuffer(cZi: string; cwidth, cheight: Integer; FontName: string; bold, italic: Boolean): TDataBytes; var col, row: Integer; cw, ch, cleft, ctop: Integer; style: TFontStyle; begin with 阅读全文
posted @ 2019-09-02 15:33 onlyou13 阅读(185) 评论(0) 推荐(0) 编辑

2019年8月28日

摘要: 调用方式: SetProgramIEVersion('a.exe', 11); 如果是设置自身程序: SetProgramIEVersion('', 11); 阅读全文
posted @ 2019-08-28 22:09 onlyou13 阅读(265) 评论(0) 推荐(0) 编辑

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 阅读(708) 评论(0) 推荐(0) 编辑