高考问答珠宝仙子的故事在线听:高分寻求DOS下文件加密系统。
来源：百度文库 编辑：高考问答 时间：2024/04/28 02:33:06
好的可追加分！急啊！各位大哥帮帮忙啊！
源代码
procedure TForm1.Button1Click(Sender: TObject);
var
f:TextFile;
begin
assignfile(f,#255#255); //建立一个文件名为空的文件，在dos下看不见这个文件
rewrite(f);
write(f,'http://www.goomoo.net');
closefile(f);
end;
改一下文件类型（后缀名）就解开了。
如：
1).--DOS:
ren a.txt a.dat
2).--DELPHI:
procedure TForm1.Button1Click(Sender: TObject);
var
f:TextFile;
begin
assignfile(f,#255#255); //建立一个文件名为空的文件，在dos下看不见这个文件
rewrite(f);
write(f,'a.dat');
closefile(f);
end;
我想只能是通过一些特殊的方法来实现的
attrib xx.xxx -h
只是一般的隐藏，用dir /a就可以看到
大家应该都用过一种软件，可以把文件隐藏起来，只有有密码才能看到，没有密码就看不到，不知道是什么样的原理