EZAge-CSDN博客

原创 Android 权限申请

try { registerForActivityResult(new ActivityResultContracts.RequestMultiplePermissions(), new ActivityResultCallback<Map<String, Boolean>>() { @Override p...

2022-05-29 21:54:20 174

function FormatSize(size:Cardinal):string;const us:array [0..5] of string=('B','KB','MB','GB','TB','PB'); u=1024;var i:Integer; d:Double;begin i:=0; d:=size; while d>u do begin d:=d/u; Inc(i); end; Result:=Format('%....

2021-08-06 12:47:41 190

原创 D7全局热键

一个简单的Delphi7全局热键unit uHotKey;interfaceuses Windows, SysUtils, Messages, Classes;const VK_0=$30; //0键 VK_1=$31; //1键 VK_2=$32; //2键 VK_3=$33; //3键 VK_4=$34; //4键 VK_5=$35; ...

2019-03-11 17:29:08 183

HttpTest.zip

function HttpPost(aUrl,aData:string;aHeader:string=''):string; //POST function HttpGet(aUrl:string;aHeader:string=''):string; //GET function HttpDownLoad(aUrl,aFile:string;aHeader:string=''):Boolean; //下载文件

2021-05-10

D7全局热键

一个Delphi7版的全局热键，实现了简单注册全局热键，无窗口化

2019-03-11

MOD&XM音乐播放DLL（Delphi源码）

2016-02-19

[易语言][源码]常用子程序

功能如下：创建文件夹 (路径) 到简单目录 (路径) 到正确目录 (路径) 到正确网址 (网址) 取网址地址 (网址) 取文件后缀 (路径) 取文件名称 (路径) 取文件名称_无后缀 (路径) 取文件目录 (路径) 取文件数据摘要 (文件, 块大小) 取左边文本 (文本, 分割) 取右边文本 (文本, 分割) 取中间文本 (文本, 前分割, 后分割) 删首尾文本 (原始文本, 删除文本)

2011-03-03

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人