疯狂delphi - 博客园

剪切板-监视剪贴板

摘要：相关资料： http://user.qzone.qq.com/513187410/blog/1265981516 实例原码：阅读全文

posted @ 2016-05-17 10:12 疯狂delphi 阅读(3294) 评论(0) 推荐(0)

BAT-使用BAT方法删除目录下0KB文件

摘要： @Echo Off For /f "tokens=*" %%i in ('dir /a-d /b /s "*.*"') do ( If "%%~zi"=="0" (Del /q /f "%%i")) Pause 阅读全文

posted @ 2016-05-03 18:12 疯狂delphi 阅读(935) 评论(0) 推荐(0)

Delphi使用FindClass实现动态建立对像（有点像反射）

摘要：相关资料：http://www.blogjava.net/nokiaguy/archive/2008/05/10/199739.html 阅读全文

posted @ 2016-05-03 11:01 疯狂delphi 阅读(825) 评论(0) 推荐(0)

Delphi使用TStringHash实现建立类（有点像反射）

摘要： 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls, jpeg, ExtCtrls, 8 IniFiles;//TStrin... 阅读全文

posted @ 2016-05-03 10:47 疯狂delphi 阅读(812) 评论(0) 推荐(0)

获取日期时间信息

摘要： 1 function netDate:string; 2 var//网页头获取日期时间信息 3 v:Variant; 4 url,GetText:string; 5 dd,mm,yy:string; 6 ii,iGMT:integer; 7 TT:Tdate; 8 function MonthStr(x:string):integer; 9 begi... 阅读全文

posted @ 2016-04-22 11:43 疯狂delphi 阅读(492) 评论(0) 推荐(0)

Android实例-IdHTTP下载(并实现自动安装)(XE10+小米2)

摘要：相关资料： 1.群号 383675978 2.运行时提示"connection closed gracefully"错误原因与解决 http://www.delphifans.com/InfoView/Article_4588.html 3.编译时提示"[Exec Error] The comman 阅读全文

posted @ 2016-04-21 14:54 疯狂delphi 阅读(2804) 评论(0) 推荐(1)

Android实例-获取程序版本号(XE10+小米2)

摘要：相关资料： 383675978群号实例源码：第三方源码：阅读全文

posted @ 2016-04-20 18:21 疯狂delphi 阅读(1471) 评论(0) 推荐(0)

Android实例-调用系统APP(XE10+小米2)

摘要：相关资料： 1.群号383675978 2.http://blog.sina.com.cn/s/blog_44fa172f0101rmjt.html 3.PS:ListView1.ItemAppearanceObjects.ItemObjects.Text.Font.Size:=20; 设置字体大小阅读全文

posted @ 2016-04-20 17:30 疯狂delphi 阅读(4368) 评论(0) 推荐(0)

BAT-使用BAT方法清理系统垃圾

摘要： @echo offecho 正在清理......del /f /s /q %systemdrive%\*.tmpdel /f /s /q %systemdrive%\*._mpdel /f /s /q %systemdrive%\*.logdel /f /s /q %systemdrive%\*.g 阅读全文

posted @ 2016-04-07 10:06 疯狂delphi 阅读(422) 评论(0) 推荐(0)

Android实例-全屏显示程序(XE10+小米2)(无图)

摘要：方法一：选中窗体->BorderStyle改为“None” 方法二： 1.下载第三方控件QAndroid.Shell 2.执行FShell.Execute('su -c mount -o remount,rw /system');FShell.Execute('su -c mv /system/pr 阅读全文

posted @ 2016-03-31 17:27 疯狂delphi 阅读(852) 评论(0) 推荐(0)