鱼C论坛

 找回密码
 立即注册
查看: 3458|回复: 9

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

[复制链接]
发表于 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)



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







想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
 楼主| 发表于 2012-9-1 16:41:12 | 显示全部楼层
沙发~
字节补丁.exe
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
 楼主| 发表于 2012-9-1 16:43:12 | 显示全部楼层
不管放多少东西都显示0字节。而且不好删掉。可以用来干坏事哦,,骗骗新手没问题
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-9-2 00:04:15 | 显示全部楼层
学习一下,尝试一下,相互交流经验
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-9-3 02:22:55 | 显示全部楼层
是文件名带两个“.”的吗?如果是,用cmd的命令就可以创建。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-9-10 01:10:33 | 显示全部楼层
貌似用RenameFile函数就能完成。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-9-10 16:11:41 | 显示全部楼层
:loveliness:~~~~~~~~~~~~
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-10-15 21:02:49 | 显示全部楼层
谢谢看看什么内容
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2014-7-31 16:13:59 | 显示全部楼层
好心的人还是多的
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2014-10-3 14:57:28 | 显示全部楼层
谢谢分享
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-12-22 15:30

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表