一个小程序咯..创建特殊文件夹【Delphi】

Assembly！ · 发表于 2012-9-1 16:40:34

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

本帖最后由 Assembly！于 2012-9-2 17:46 编辑

创建一个特殊的文件夹，无法正常打开，显示0字节（不管里面有多少东西）

我的电脑是XP的，不知道WIN7能不能用。利用的是XP的一个漏洞。
不过本程序还有一点比较特殊。通常的Delphi文件编译出来至少300K了。但是我这个只有40K（包含ICO的12K）。原因是用了KOL&MCK

网上找的说明
一、KOL是什么?KOL能做什么? MCK是什么?MCK能做什么?KOL是一套对象库，免
费而且开放源代码。它能够使Delphi编出尺寸非常小的32位Windows图形用户
界面的应用程序。
目前支持的Delphi版本:delphi7，Delphi6,Delphi5,Delphi4,Delphi3和
Delphi2。
使用KOL在D2-D5中编写的最小图形界面程序(只有一个窗体的空应用程序)，只
有13K左右。在D6中为20K左右。
MCK一套以KOL为基础的可视化组件，用它就像用VCL一样的方便省事而且可以
达到和KOL一样的效果。
二、KOL和MCK的安装
1、下载到KOL和MCK后，把它们解压到你自已想要的目录中。把KOL中的
kol.pas拷贝到MCK目录中。
2、运行Delphi选择Tools菜单->Environmaent Options...->Library页，选择
"Library Path"右边的按钮会弹出"Directories"对话框，然后添加KOL和MCK
的路径。
3、打MCK目录中的包文件安装（Delphi7就用里面带7的包。里面有挺多个的。从D3开始到D7。只安装D7就好了）
三、如何创建一个KOL工程
1、在Delphi中新建一个应用程序,然后保存(这一步一定要做)，保存时工程名
一定不要改变，窗体名可以随便。
2、在控件面板KOL中放一个TKOLProject控件到窗体并设置projectDest属性为
你想要的工程名比如说是"KOLSample"，再把dprResource属性设为真(这关系
到你能不能用Project->Options...中的设置设置你的程序图标以及程序的版
本号)。
3、在控件面板KOL中放一个TKOLForm控件到窗体，这个控件和TForm差不多的
，保存并关闭当前工程。
4、这时候你就会在保存目录中发现一个名为"KOLSample"的工程，聪明的你可
能会想到Project1这个工程不再需要了，是的你可以毫不留情的删掉它(其它
的就不要删了)。打开KOLSample，运行它，看看生成的程序，怎么样?：）

安装Delphi控件提示：关闭360个人经验。。

这个KOL很强大哦，听说能编出1K下载者。。。不管你信不信，反正我是信了。

附上源码。源码用了KOL控件

演示程序

创建文件夹.rar (20.95 KB, 下载次数: 13)

游客，如果您要查看本帖隐藏内容请回复

Assembly！ · 发表于 2012-9-1 16:41:12

沙发~
字节补丁.exe

Assembly！ · 发表于 2012-9-1 16:43:12

不管放多少东西都显示0字节。而且不好删掉。可以用来干坏事哦，，骗骗新手没问题

网络学习 · 发表于 2012-9-2 00:04:15

学习一下，尝试一下，相互交流经验

贝壳 · 发表于 2012-9-3 02:22:55

是文件名带两个“.”的吗？如果是，用cmd的命令就可以创建。

ヾ___泣子_、 · 发表于 2012-9-10 01:10:33

貌似用RenameFile函数就能完成。

陽光ㄟ有點冷 · 发表于 2012-9-10 16:11:41

:loveliness:~~~~~~~~~~~~

无言(_E__E) · 发表于 2012-10-15 21:02:49

谢谢看看什么内容

xiaojiuzhang · 发表于 2014-7-31 16:13:59

好心的人还是多的

cyrs · 发表于 2014-10-3 14:57:28

谢谢分享

账号		自动登录	找回密码
密码			立即注册

[作品展示] 一个小程序咯..创建特殊文件夹【Delphi】

马上注册，结交更多好友，享用更多功能^_^