minitools

以下是一系列使用 Delphi / SDK（自行封装的 XCL 类库）编写的小程序，大多改写自早年的 PB 程序。我将其合称为 minitools。

minitools 打包下载（最后更新：2011-5-22）：

    minitools.zip （142 KB）

AutoCDDoor（光驱开关小工具）：

这个是由世界之窗论坛某个帖子的讨论引出来的一个小程序 :-)。程序的功能极其简单，没有图形界面，需要的话可以将其快捷方式放到 Windows 快速启动栏上，然后点击一下打开光驱，再点击一下则关闭。

当前版本：1.0 （2008. 3.）

下载：AutoCDDoor.zip（6 KB）

单 exe 文件，不生成任何附加文件。

MuteMe（切换静音程序）：

这个程序用于切换系统的静音状态，同样没有图形界面，需要的话可以将其快捷方式放到 Windows 快速启动栏上，点击一下则执行一下切换。

当前版本：1.0 （2011. 5.）

下载：MuteMe.zip（16 KB）

单 exe 文件，不生成任何附加文件。

SwapMouse（交换鼠标左右键）：

我家宝宝现在四岁了，有时喜欢在电脑上打打小游戏。但他的手太小，张不开太大的幅度，抓住鼠标时小食指只能碰到右键。因此我家的鼠标经常需要在“右键单击”（宝宝用）与“左键单击”（我们自己用）两种模式之间切换。原来每次切换都需要打开控制面板，双击“鼠标”项，修改“鼠标键配置”，再“应用”-->“确定”。后来切换得多了，嫌太麻烦，就写了这个小程序。

程序的功能极其简单，没有图形界面，需要的话可以将其快捷方式放到 Windows 快速启动栏上，每点击一下，就切换一下左右键。

这个软件同样适合于鼠标左键出问题了（比如我碰到过多次的就是左键单击成双击）、又懒得换鼠标的朋友 :-)

当前版本：1.0 （2009. 2.）

下载：SwapMouse.zip（8 KB）

单 exe 文件，不生成任何附加文件。

BeTop（任意程序置顶）：

很简单的小程序，没有图形界面。运行一下，桌面上的当前窗口就会置顶。再按一下则取消置顶。

此程序建议放在 minipad2 的快速链接中，设定快捷键来运行。如果用鼠标运行的话，因点击本程序时会使桌面上的当前窗口失去焦点，所以会置顶失败。

当前版本：1.0 （2010. 8.）

下载：BeTop.zip（8 KB）

单 exe 文件，不生成任何附加文件。

DensityCalc（密度计算程序）：

本人工作中经常需要根据体积与重量计算待测材料的密度。因此编写了这一小程序。程序本身的功能非常简单，我历来将其作为练习程序，每次学习一种新的编程语言或工具时，就将其作为试笔。因此这个小程序对我而言具有特别的意义，它忠实地记录了我这几年在编程方面的成长历程。现放在这儿，与工作中有同样需要的人共享（虽然估计下载的人寥寥无几，呵呵）

当前版本：1.6（2008. 12.）

版本历史：

• 1.6 （2008. 12.）：使用增强的 XCL 库进行改写与重编译。
• 1.5 （2008. 5.）：使用 Win32 SDK 重新编写。加入中英双语切换功能。40K。
• 1.3 （2008. 3.）：因为需要拷给泰国客户使用，做成了英文版，并加入“总在最前”功能。396K，经 upx 压缩后 174K。
• 1.2 （2007. 4.）：移植为 Delphi 绿色软件（本人的第一个 Delphi 程序 :-)。单 exe，393KB。
• 1.1 （2006. 9.）：稍作改进，并使用 InnoSetup 重新制作安装程序。
• 1.0 （2005. 6.）：使用 PowerBuilder 编写。使用 WinRar 制作安装程序（程序本身 103K，捆绑 5 个 PB dll 文件，安装后共计 5.6M）。

下载：DensityCalc.zip（20 KB）

CommandShell（UPX 外壳程序）：

用于方便进行 UPX 或 StripReloc 压缩的图形化外壳程序。

当初写这个程序的目的是由于 minipad2 2.X 使用 UPX 进行压缩，而 UPX 本身只提供命令行操作方式，每次都需要进入 DOS 界面、切换路径、输入命令行，较为麻烦，因此写了这个小程序来方便操作。功能非常简单，其特点是自动记忆历史压缩记录，以及最近一次压缩的文件。（当然后来想想，如果只用来压缩 minipad2 的话，其实写个 bat 批文件就可以了，也就一两行命令的事情...）

当前版本：1.2（2008. 12.）

版本历史：

• 1.2 （2008. 12.）：更名为 CommandShell，使用增强的 XCL 库进行改写与重编译，支持历史压缩记录的下拉列表，支持通过修改 CommandShell.def 文件进行功能扩充。
• 1.1 （2008. 4.）：使用 Win32 SDK 改写。增加对 StripReloc 的支持。
• 1.0 （2007. 12.）：第一个版本（MyUpxShell 1.0）。Upx 外壳程序，自动记忆最后一次压缩的文件。

下载（程序本身）：CommandShell.zip（19 KB）

下载（程序本身 + UPX 3.01 + StripReloc 1.13）：CommandShell.7z（301 KB）

UPX 与 StripReloc 本身为开源免费软件。

最新版的 UPX 可从以下地址下载：UPX 主页

最新版的 StripReloc 可从以下地址下载：StripReloc 主页

ProfitCalc（储蓄收益计算程序）：

投入 XX 资金，按某种方式存入银行，可以计算出若干年后收益多少。本程序适合于当保险推销员向你推销某某储蓄型保险产品时，你可以拿介绍资料上的历年收益表与用这个程序算出来的同样资金存入银行的收益作比较（05 年 9 月我家宝宝出生时，同时有三家沾亲带故的保险代理人向俺推荐从小存到大的宝宝险，本人当时权衡不定，于是写了这个小程序）。

当前版本：1.2（2008. 12.）

版本历史：

• 1.2 （2008. 12.）：使用增强的 XCL 库进行改写与重编译。
• 1.1 （2008. 5.）：使用 Win32 SDK 改写。
• 1.0 （2005. 10.）：第一个版本。使用 PowerBuilder 编写。

下载：ProfitCalc.zip（48 KB）

TableSplit（表格逐行拆分器）：

本程序的诞生源于这样的一个特殊需求：我所在的公司的某种仪器产品能够同时在多个频率下测试材料的某种特性。我的一个客户需要将测试生成的数据在 Origin 里另行作图，但是由仪器软件导出的数据并不按每个频率单独生成一个 txt，而是多个频率并在一个文件里，循环地每个频率的数据各占一行。这样就很难做进一步处理。客户求我帮忙，我给他写了这个小程序，读入一个 txt，按照一定的设定每隔 n 行生成一个 txt，同时把原文件的表头行加到每一个 txt 里。

虽然最初的需求很特殊（就是辅助处理一下那台仪器的数据），但是软件本身有一定的通用性，或许有朋友在某些特定场合正好用得上，因此仍然放在这儿供大家下载。

当前版本：1.2（2008. 12.）

• 1.2 （2008. 12.）：使用增强的 XCL 库进行改写与重编译。
• 1.1 （2008. 5.）：使用 Win32 SDK 改写。自动识别与支持 ANSI、UTF8、UTF16LE、UTF16BE 四种文本编码。
• 1.0 （2008. 4.）：第一个版本。使用 Delphi / VCL 编写。仅支持 ANSI 格式的 txt 文件。

下载：TableSplit.zip（19 KB）